X-Git-Url: http://source.jalview.org/gitweb/?a=blobdiff_plain;f=forester%2Fjava%2Fsrc%2Forg%2Fforester%2Frio%2FRIO.java;h=f2056408b97c8e983afec2ecd13b6e99437f7b88;hb=c0439ed8b088887ffea2faf11bc7897333287cb3;hp=0cbe6dd6e7ae2c6c0c799b7cc86aed2d6b1e1433;hpb=8f8bbd46b51ab6778da479b6fa2a444b46ac3a60;p=jalview.git diff --git a/forester/java/src/org/forester/rio/RIO.java b/forester/java/src/org/forester/rio/RIO.java index 0cbe6dd..f205640 100644 --- a/forester/java/src/org/forester/rio/RIO.java +++ b/forester/java/src/org/forester/rio/RIO.java @@ -30,12 +30,12 @@ package org.forester.rio; import java.io.File; import java.io.FileNotFoundException; import java.io.IOException; -import java.text.DecimalFormat; import java.util.ArrayList; import java.util.Collections; import java.util.HashMap; import java.util.HashSet; import java.util.List; +import java.util.Map; import java.util.Set; import java.util.SortedSet; import java.util.TreeSet; @@ -78,8 +78,11 @@ public final class RIO { private final boolean _produce_log; private final boolean _verbose; private final REROOTING _rerooting; + private final Phylogeny _species_tree; + private Phylogeny _min_dub_gene_tree; + private Map _dup_to_tree_map; - private RIO( final Phylogeny[] gene_trees, + private RIO( final IteratingPhylogenyParser p, final Phylogeny species_tree, final ALGORITHM algorithm, final REROOTING rerooting, @@ -87,15 +90,18 @@ public final class RIO { int first, int last, final boolean produce_log, - final boolean verbose ) throws IOException, SDIException, RIOException { + final boolean verbose, + final boolean transfer_taxonomy ) + throws IOException, SDIException, RIOException { if ( ( last == DEFAULT_RANGE ) && ( first >= 0 ) ) { - last = gene_trees.length - 1; + last = END_OF_GT; } else if ( ( first == DEFAULT_RANGE ) && ( last >= 0 ) ) { first = 0; } removeSingleDescendentsNodes( species_tree, verbose ); - checkPreconditions( gene_trees, species_tree, rerooting, outgroup, first, last ); + p.reset(); + checkPreconditions( p, species_tree, rerooting, outgroup, first, last ); _produce_log = produce_log; _verbose = verbose; _rerooting = rerooting; @@ -106,10 +112,12 @@ public final class RIO { _analyzed_gene_trees = null; _removed_gene_tree_nodes = null; _duplications_stats = new BasicDescriptiveStatistics(); - inferOrthologs( gene_trees, species_tree, algorithm, outgroup, first, last ); + p.reset(); + inferOrthologs( p, species_tree, algorithm, outgroup, first, last, transfer_taxonomy ); + _species_tree = species_tree; } - private RIO( final IteratingPhylogenyParser p, + private RIO( final Phylogeny[] gene_trees, final Phylogeny species_tree, final ALGORITHM algorithm, final REROOTING rerooting, @@ -117,16 +125,17 @@ public final class RIO { int first, int last, final boolean produce_log, - final boolean verbose ) throws IOException, SDIException, RIOException { + final boolean verbose, + final boolean transfer_taxonomy ) + throws IOException, SDIException, RIOException { if ( ( last == DEFAULT_RANGE ) && ( first >= 0 ) ) { - last = END_OF_GT; + last = gene_trees.length - 1; } else if ( ( first == DEFAULT_RANGE ) && ( last >= 0 ) ) { first = 0; } removeSingleDescendentsNodes( species_tree, verbose ); - p.reset(); - checkPreconditions( p, species_tree, rerooting, outgroup, first, last ); + checkPreconditions( gene_trees, species_tree, rerooting, outgroup, first, last ); _produce_log = produce_log; _verbose = verbose; _rerooting = rerooting; @@ -137,8 +146,8 @@ public final class RIO { _analyzed_gene_trees = null; _removed_gene_tree_nodes = null; _duplications_stats = new BasicDescriptiveStatistics(); - p.reset(); - inferOrthologs( p, species_tree, algorithm, outgroup, first, last ); + inferOrthologs( gene_trees, species_tree, algorithm, outgroup, first, last, transfer_taxonomy ); + _species_tree = species_tree; } public final Phylogeny[] getAnalyzedGeneTrees() { @@ -152,97 +161,45 @@ public final class RIO { /** * Returns the numbers of number of ext nodes in gene trees analyzed (after * stripping). - * + * * @return number of ext nodes in gene trees analyzed (after stripping) */ public final int getExtNodesOfAnalyzedGeneTrees() { return _ext_nodes; } + public final TaxonomyComparisonBase getGSDIRtaxCompBase() { + return _gsdir_tax_comp_base; + } + /** * Returns the numbers of number of int nodes in gene trees analyzed (after * stripping). - * + * * @return number of int nodes in gene trees analyzed (after stripping) */ public final int getIntNodesOfAnalyzedGeneTrees() { return _int_nodes; } - public final TaxonomyComparisonBase getGSDIRtaxCompBase() { - return _gsdir_tax_comp_base; - } - public final StringBuilder getLog() { return _log; } + final public Phylogeny getMinDuplicationsGeneTree() { + return _min_dub_gene_tree; + } + + public final IntMatrix getOrthologTable() { + return _m; + } + public final List getRemovedGeneTreeNodes() { return _removed_gene_tree_nodes; } - private final void inferOrthologs( final Phylogeny[] gene_trees, - final Phylogeny species_tree, - final ALGORITHM algorithm, - final String outgroup, - final int first, - final int last ) throws SDIException, RIOException, FileNotFoundException, - IOException { - if ( algorithm == ALGORITHM.SDIR ) { - // Removes from species_tree all species not found in gene_tree. - PhylogenyMethods.taxonomyBasedDeletionOfExternalNodes( gene_trees[ 0 ], species_tree ); - if ( species_tree.isEmpty() ) { - throw new RIOException( "failed to establish species based mapping between gene and species trees" ); - } - } - final Phylogeny[] my_gene_trees; - if ( ( first >= 0 ) && ( last >= first ) && ( last < gene_trees.length ) ) { - my_gene_trees = new Phylogeny[ ( 1 + last ) - first ]; - int c = 0; - for( int i = first; i <= last; ++i ) { - my_gene_trees[ c++ ] = gene_trees[ i ]; - } - } - else { - my_gene_trees = gene_trees; - } - if ( log() ) { - preLog( gene_trees.length, species_tree, algorithm, outgroup ); - } - if ( _verbose && ( my_gene_trees.length >= 4 ) ) { - System.out.println(); - } - _analyzed_gene_trees = new Phylogeny[ my_gene_trees.length ]; - int gene_tree_ext_nodes = 0; - for( int i = 0; i < my_gene_trees.length; ++i ) { - final Phylogeny gt = my_gene_trees[ i ]; - if ( _verbose && ( my_gene_trees.length > 4 ) ) { - ForesterUtil.updateProgress( ( ( double ) i ) / my_gene_trees.length ); - } - if ( i == 0 ) { - gene_tree_ext_nodes = gt.getNumberOfExternalNodes(); - } - else if ( gene_tree_ext_nodes != gt.getNumberOfExternalNodes() ) { - throw new RIOException( "gene tree #" + i + " has a different number of external nodes (" - + gt.getNumberOfExternalNodes() + ") than the preceding gene tree(s) (" + gene_tree_ext_nodes - + ")" ); - } - if ( algorithm == ALGORITHM.SDIR ) { - // Removes from gene_tree all species not found in species_tree. - PhylogenyMethods.taxonomyBasedDeletionOfExternalNodes( species_tree, gt ); - if ( gt.isEmpty() ) { - throw new RIOException( "failed to establish species based mapping between gene and species trees" ); - } - } - _analyzed_gene_trees[ i ] = performOrthologInference( gt, species_tree, algorithm, outgroup, i ); - } - if ( log() ) { - postLog( species_tree, first, last ); - } - if ( _verbose && ( my_gene_trees.length > 4 ) ) { - System.out.println(); - System.out.println(); - } + public final Phylogeny getSpeciesTree() { + return _species_tree; } private final void inferOrthologs( final IteratingPhylogenyParser parser, @@ -250,8 +207,9 @@ public final class RIO { final ALGORITHM algorithm, final String outgroup, int first, - final int last ) throws SDIException, RIOException, FileNotFoundException, - IOException { + final int last, + final boolean transfer_taxonomy ) + throws SDIException, RIOException, FileNotFoundException, IOException { if ( !parser.hasNext() ) { throw new RIOException( "no gene trees to analyze" ); } @@ -261,7 +219,6 @@ public final class RIO { if ( _verbose ) { System.out.println(); } - final DecimalFormat pf = new java.text.DecimalFormat( "000" ); int gene_tree_ext_nodes = 0; int i = 0; int counter = 0; @@ -269,8 +226,14 @@ public final class RIO { while ( parser.hasNext() ) { final Phylogeny gt = parser.next(); if ( no_range || ( ( i >= first ) && ( i <= last ) ) ) { + if ( gt.isEmpty() ) { + throw new RIOException( "gene tree #" + i + " is empty" ); + } + if ( gt.getNumberOfExternalNodes() == 1 ) { + throw new RIOException( "gene tree #" + i + " has only one external node" ); + } if ( _verbose ) { - ForesterUtil.updateProgress( i, pf ); + System.out.print( "\r" + i ); } if ( counter == 0 ) { if ( algorithm == ALGORITHM.SDIR ) { @@ -294,12 +257,20 @@ public final class RIO { throw new RIOException( "failed to establish species based mapping between gene and species trees" ); } } - final Phylogeny analyzed_gt = performOrthologInference( gt, species_tree, algorithm, outgroup, counter ); + final Phylogeny analyzed_gt = performOrthologInference( gt, + species_tree, + algorithm, + outgroup, + counter, + transfer_taxonomy ); RIO.calculateOrthologTable( analyzed_gt, true, counter ); ++counter; } ++i; } + if ( _verbose ) { + System.out.print( "\rGene trees analyzed :\t" + counter ); + } if ( ( first >= 0 ) && ( counter == 0 ) && ( i > 0 ) ) { throw new RIOException( "attempt to analyze first gene tree #" + first + " in a set of " + i ); } @@ -307,7 +278,7 @@ public final class RIO { first = 0; } if ( log() ) { - postLog( species_tree, first, first + counter - 1 ); + postLog( species_tree, first, ( first + counter ) - 1 ); } if ( _verbose ) { System.out.println(); @@ -315,6 +286,82 @@ public final class RIO { } } + private final void inferOrthologs( final Phylogeny[] gene_trees, + final Phylogeny species_tree, + final ALGORITHM algorithm, + final String outgroup, + final int first, + final int last, + final boolean transfer_taxonomy ) + throws SDIException, RIOException, FileNotFoundException, IOException { + if ( algorithm == ALGORITHM.SDIR ) { + // Removes from species_tree all species not found in gene_tree. + PhylogenyMethods.taxonomyBasedDeletionOfExternalNodes( gene_trees[ 0 ], species_tree ); + if ( species_tree.isEmpty() ) { + throw new RIOException( "failed to establish species based mapping between gene and species trees" ); + } + } + final Phylogeny[] my_gene_trees; + if ( ( first >= 0 ) && ( last >= first ) && ( last < gene_trees.length ) ) { + my_gene_trees = new Phylogeny[ ( 1 + last ) - first ]; + int c = 0; + for( int i = first; i <= last; ++i ) { + my_gene_trees[ c++ ] = gene_trees[ i ]; + } + } + else { + my_gene_trees = gene_trees; + } + if ( log() ) { + preLog( gene_trees.length, species_tree, algorithm, outgroup ); + } + if ( _verbose && ( my_gene_trees.length >= 4 ) ) { + System.out.println(); + } + _analyzed_gene_trees = new Phylogeny[ my_gene_trees.length ]; + int gene_tree_ext_nodes = 0; + for( int i = 0; i < my_gene_trees.length; ++i ) { + final Phylogeny gt = my_gene_trees[ i ]; + if ( gt.isEmpty() ) { + throw new RIOException( "gene tree #" + i + " is empty" ); + } + if ( gt.getNumberOfExternalNodes() == 1 ) { + throw new RIOException( "gene tree #" + i + " has only one external node" ); + } + if ( _verbose && ( my_gene_trees.length > 4 ) ) { + ForesterUtil.updateProgress( ( ( double ) i ) / my_gene_trees.length ); + } + if ( i == 0 ) { + gene_tree_ext_nodes = gt.getNumberOfExternalNodes(); + } + else if ( gene_tree_ext_nodes != gt.getNumberOfExternalNodes() ) { + throw new RIOException( "gene tree #" + i + " has a different number of external nodes (" + + gt.getNumberOfExternalNodes() + ") than the preceding gene tree(s) (" + gene_tree_ext_nodes + + ")" ); + } + if ( algorithm == ALGORITHM.SDIR ) { + // Removes from gene_tree all species not found in species_tree. + PhylogenyMethods.taxonomyBasedDeletionOfExternalNodes( species_tree, gt ); + if ( gt.isEmpty() ) { + throw new RIOException( "failed to establish species based mapping between gene and species trees" ); + } + } + _analyzed_gene_trees[ i ] = performOrthologInference( gt, + species_tree, + algorithm, + outgroup, + i, + transfer_taxonomy ); + } + if ( log() ) { + postLog( species_tree, first, last ); + } + if ( _verbose && ( my_gene_trees.length > 4 ) ) { + System.out.println(); + System.out.println(); + } + } + private final boolean log() { return _produce_log; } @@ -325,7 +372,6 @@ public final class RIO { } private final void logRemovedGeneTreeNodes() { - log( "Species stripped from gene trees:" ); final SortedSet rn = new TreeSet(); for( final PhylogenyNode n : getRemovedGeneTreeNodes() ) { final Taxonomy t = n.getNodeData().getTaxonomy(); @@ -344,17 +390,21 @@ public final class RIO { } } } + final StringBuilder sb = new StringBuilder(); for( final String s : rn ) { - log( s ); + sb.append( '\t' ); + sb.append( s ); } - log( "" ); + log( "Species stripped from gene trees :" + sb ); } private final Phylogeny performOrthologInference( final Phylogeny gene_tree, final Phylogeny species_tree, final ALGORITHM algorithm, final String outgroup, - final int i ) throws SDIException, RIOException { + final int i, + final boolean transfer_taxonomy ) + throws SDIException, RIOException { final Phylogeny assigned_tree; switch ( algorithm ) { case SDIR: { @@ -362,7 +412,11 @@ public final class RIO { break; } case GSDIR: { - assigned_tree = performOrthologInferenceByGSDI( gene_tree, species_tree, outgroup, i ); + assigned_tree = performOrthologInferenceByGSDI( gene_tree, + species_tree, + outgroup, + i, + transfer_taxonomy ); break; } default: { @@ -384,10 +438,13 @@ public final class RIO { private final Phylogeny performOrthologInferenceByGSDI( final Phylogeny gene_tree, final Phylogeny species_tree, final String outgroup, - final int i ) throws SDIException, RIOException { + final int i, + final boolean transfer_taxonomy ) + throws SDIException, RIOException { final Phylogeny assigned_tree; + final int dups; if ( _rerooting == REROOTING.BY_ALGORITHM ) { - final GSDIR gsdir = new GSDIR( gene_tree, species_tree, true, i == 0 ); + final GSDIR gsdir = new GSDIR( gene_tree, species_tree, true, i == 0, transfer_taxonomy ); assigned_tree = gsdir.getMinDuplicationsSumGeneTree(); if ( i == 0 ) { _removed_gene_tree_nodes = gsdir.getStrippedExternalGeneTreeNodes(); @@ -401,7 +458,7 @@ public final class RIO { if ( i == 0 ) { _gsdir_tax_comp_base = gsdir.getTaxCompBase(); } - _duplications_stats.addValue( gsdir.getMinDuplicationsSum() ); + dups = gsdir.getMinDuplicationsSum(); } else { if ( _rerooting == REROOTING.MIDPOINT ) { @@ -411,7 +468,7 @@ public final class RIO { final PhylogenyNode n = gene_tree.getNode( outgroup ); gene_tree.reRoot( n ); } - final GSDI gsdi = new GSDI( gene_tree, species_tree, true, true, true ); + final GSDI gsdi = new GSDI( gene_tree, species_tree, true, true, true, transfer_taxonomy ); _removed_gene_tree_nodes = gsdi.getStrippedExternalGeneTreeNodes(); for( final PhylogenyNode r : _removed_gene_tree_nodes ) { if ( !r.getNodeData().isHasTaxonomy() ) { @@ -423,46 +480,103 @@ public final class RIO { if ( i == 0 ) { _gsdir_tax_comp_base = gsdi.getTaxCompBase(); } - _duplications_stats.addValue( gsdi.getDuplicationsSum() ); + dups = gsdi.getDuplicationsSum(); } + assigned_tree.setRerootable( false ); + double new_dist = -1; + if ( ( i == 0 ) || ( dups < _duplications_stats.getMin() ) ) { + _min_dub_gene_tree = assigned_tree; + } + else if ( dups == _duplications_stats.getMin() ) { + new_dist = PhylogenyMethods.calculateMaxDistanceToRoot( assigned_tree ); + if ( new_dist < PhylogenyMethods.calculateMaxDistanceToRoot( _min_dub_gene_tree ) ) { + _min_dub_gene_tree = assigned_tree; + } + } + if ( _dup_to_tree_map == null ) { + _dup_to_tree_map = new HashMap(); + } + if ( !_dup_to_tree_map.containsKey( dups ) ) { + _dup_to_tree_map.put( dups, assigned_tree ); + } + else { + if ( new_dist == -1 ) { + new_dist = PhylogenyMethods.calculateMaxDistanceToRoot( assigned_tree ); + } + if ( new_dist < PhylogenyMethods.calculateMaxDistanceToRoot( _dup_to_tree_map.get( dups ) ) ) { + _dup_to_tree_map.put( dups, assigned_tree ); + } + } + _duplications_stats.addValue( dups ); return assigned_tree; } + final public Map getDuplicationsToTreeMap() { + return _dup_to_tree_map; + } + private final Phylogeny performOrthologInferenceBySDI( final Phylogeny gene_tree, final Phylogeny species_tree ) throws SDIException { final SDIR sdir = new SDIR(); - return sdir.infer( gene_tree, species_tree, false, true, true, true, 1 )[ 0 ]; + final Phylogeny r = sdir.infer( gene_tree, species_tree, false, true, true, true, 1 )[ 0 ]; + r.setRerootable( false ); + final int dups = sdir.getMinimalDuplications(); + _duplications_stats.addValue( dups ); + return r; } private final void postLog( final Phylogeny species_tree, final int first, final int last ) { - log( "" ); + final java.text.DecimalFormat df = new java.text.DecimalFormat( "0.##" ); + final int min = ( int ) getDuplicationsStatistics().getMin(); + final int max = ( int ) getDuplicationsStatistics().getMax(); + final int median = ( int ) getDuplicationsStatistics().median(); + int min_count = 0; + int max_count = 0; + int median_count = 0; + for( double d : getDuplicationsStatistics().getData() ) { + if ( ( ( int ) d ) == min ) { + ++min_count; + } + if ( ( ( int ) d ) == max ) { + ++max_count; + } + if ( ( ( int ) d ) == median ) { + ++median_count; + } + } + final double min_count_percentage = ( 100.0 * min_count ) / getDuplicationsStatistics().getN(); + final double max_count_percentage = ( 100.0 * max_count ) / getDuplicationsStatistics().getN(); + final double median_count_percentage = ( 100.0 * median_count ) / getDuplicationsStatistics().getN(); if ( ( getRemovedGeneTreeNodes() != null ) && ( getRemovedGeneTreeNodes().size() > 0 ) ) { logRemovedGeneTreeNodes(); } - log( "Species tree external nodes (after stripping) : " + species_tree.getNumberOfExternalNodes() ); - log( "Species tree polytomies (after stripping) : " - + PhylogenyMethods.countNumberOfPolytomies( species_tree ) ); - log( "Taxonomy linking based on : " + getGSDIRtaxCompBase() ); - final java.text.DecimalFormat df = new java.text.DecimalFormat( "0.#" ); + log( "Gene trees analyzed :\t" + getDuplicationsStatistics().getN() ); if ( ( first >= 0 ) && ( last >= 0 ) ) { - log( "Gene trees analyzed range : " + first + "-" + last ); - } - log( "Gene trees analyzed : " + _duplications_stats.getN() ); - log( "Mean number of duplications : " + df.format( _duplications_stats.arithmeticMean() ) - + " (sd: " + df.format( _duplications_stats.sampleStandardDeviation() ) + ")" + " (" - + df.format( ( 100.0 * _duplications_stats.arithmeticMean() ) / getIntNodesOfAnalyzedGeneTrees() ) - + "%)" ); - if ( _duplications_stats.getN() > 3 ) { - log( "Median number of duplications : " + df.format( _duplications_stats.median() ) - + " (" + df.format( ( 100.0 * _duplications_stats.median() ) / getIntNodesOfAnalyzedGeneTrees() ) - + "%)" ); - } - log( "Minimum duplications : " + ( int ) _duplications_stats.getMin() + " (" - + df.format( ( 100.0 * _duplications_stats.getMin() ) / getIntNodesOfAnalyzedGeneTrees() ) + "%)" ); - log( "Maximum duplications : " + ( int ) _duplications_stats.getMax() + " (" - + df.format( ( 100.0 * _duplications_stats.getMax() ) / getIntNodesOfAnalyzedGeneTrees() ) + "%)" ); - log( "Gene tree internal nodes : " + getIntNodesOfAnalyzedGeneTrees() ); - log( "Gene tree external nodes : " + getExtNodesOfAnalyzedGeneTrees() ); + log( "Gene trees analyzed range :\t" + first + "-" + last ); + } + log( "Gene tree internal nodes :\t" + getIntNodesOfAnalyzedGeneTrees() ); + log( "Gene tree external nodes :\t" + getExtNodesOfAnalyzedGeneTrees() ); + log( "Removed ext gene tree nodes :\t" + getRemovedGeneTreeNodes().size() ); + log( "Spec tree ext nodes (after strip) :\t" + species_tree.getNumberOfExternalNodes() ); + log( "Spec tree polytomies (after strip) :\t" + PhylogenyMethods.countNumberOfPolytomies( species_tree ) ); + log( "Taxonomy linking based on :\t" + getGSDIRtaxCompBase() ); + log( "Mean number of duplications :\t" + df.format( getDuplicationsStatistics().arithmeticMean() ) + + "\t" + + df.format( ( 100.0 * getDuplicationsStatistics().arithmeticMean() ) + / getIntNodesOfAnalyzedGeneTrees() ) + + "%\t(sd: " + df.format( getDuplicationsStatistics().sampleStandardDeviation() ) + ")" ); + if ( getDuplicationsStatistics().getN() > 3 ) { + log( "Median number of duplications :\t" + df.format( median ) + "\t" + + df.format( ( 100.0 * median ) / getIntNodesOfAnalyzedGeneTrees() ) + "%" ); + } + log( "Minimum duplications :\t" + min + "\t" + + df.format( ( 100.0 * min ) / getIntNodesOfAnalyzedGeneTrees() ) + "%" ); + log( "Maximum duplications :\t" + ( int ) max + "\t" + + df.format( ( 100.0 * max ) / getIntNodesOfAnalyzedGeneTrees() ) + "%" ); + log( "Gene trees with median duplications :\t" + median_count + "\t" + df.format( median_count_percentage ) + + "%" ); + log( "Gene trees with minimum duplications:\t" + min_count + "\t" + df.format( min_count_percentage ) + "%" ); + log( "Gene trees with maximum duplications:\t" + max_count + "\t" + df.format( max_count_percentage ) + "%" ); } private final void preLog( final int gene_trees, @@ -470,12 +584,11 @@ public final class RIO { final ALGORITHM algorithm, final String outgroup ) { if ( gene_trees > 0 ) { - log( "Number of gene trees (total) : " + gene_trees ); + log( "Number of gene trees (total) :\t" + gene_trees ); } - log( "Algorithm : " + algorithm ); - log( "Species tree external nodes (prior to stripping): " + species_tree.getNumberOfExternalNodes() ); - log( "Species tree polytomies (prior to stripping) : " - + PhylogenyMethods.countNumberOfPolytomies( species_tree ) ); + log( "Algorithm :\t" + algorithm ); + log( "Spec tree ext nodes (prior strip) :\t" + species_tree.getNumberOfExternalNodes() ); + log( "Spec tree polytomies (prior strip) :\t" + PhylogenyMethods.countNumberOfPolytomies( species_tree ) ); String rs = ""; switch ( _rerooting ) { case BY_ALGORITHM: { @@ -495,74 +608,7 @@ public final class RIO { break; } } - log( "Re-rooting : " + rs ); - } - - public final IntMatrix getOrthologTable() { - return _m; - } - - private final static void calculateOrthologTable( final Phylogeny g, final boolean sort, final int counter ) - throws RIOException { - final List labels = new ArrayList(); - final Set labels_set = new HashSet(); - if ( counter == 0 ) { - for( final PhylogenyNode n : g.getExternalNodes() ) { - final String label = obtainLabel( labels_set, n ); - labels_set.add( label ); - labels.add( label ); - } - if ( sort ) { - Collections.sort( labels ); - } - _m = new IntMatrix( labels ); - } - updateCounts( _m, counter, g ); - } - - private final static String obtainLabel( final Set labels_set, final PhylogenyNode n ) throws RIOException { - String label; - if ( n.getNodeData().isHasSequence() && !ForesterUtil.isEmpty( n.getNodeData().getSequence().getName() ) ) { - label = n.getNodeData().getSequence().getName(); - } - else if ( n.getNodeData().isHasSequence() && !ForesterUtil.isEmpty( n.getNodeData().getSequence().getSymbol() ) ) { - label = n.getNodeData().getSequence().getSymbol(); - } - else if ( !ForesterUtil.isEmpty( n.getName() ) ) { - label = n.getName(); - } - else { - throw new RIOException( "node " + n + " has no appropriate label" ); - } - if ( labels_set.contains( label ) ) { - throw new RIOException( "label " + label + " is not unique" ); - } - return label; - } - - private final static void updateCounts( final IntMatrix m, final int counter, final Phylogeny g ) - throws RIOException { - PhylogenyMethods.preOrderReId( g ); - final HashMap map = PhylogenyMethods.createNameToExtNodeMap( g ); - for( int x = 0; x < m.size(); ++x ) { - final String mx = m.getLabel( x ); - final PhylogenyNode nx = map.get( mx ); - if ( nx == null ) { - throw new RIOException( "node \"" + mx + "\" not present in gene tree #" + counter ); - } - String my; - PhylogenyNode ny; - for( int y = 0; y < m.size(); ++y ) { - my = m.getLabel( y ); - ny = map.get( my ); - if ( ny == null ) { - throw new RIOException( "node \"" + my + "\" not present in gene tree #" + counter ); - } - if ( !PhylogenyMethods.calculateLCAonTreeWithIdsInPreOrder( nx, ny ).isDuplication() ) { - m.inreaseByOne( x, y ); - } - } - } + log( "Re-rooting :\t" + rs ); } public final static IntMatrix calculateOrthologTable( final Phylogeny[] analyzed_gene_trees, final boolean sort ) @@ -594,39 +640,46 @@ public final class RIO { final int first, final int last, final boolean produce_log, - final boolean verbose ) throws IOException, SDIException, RIOException { + final boolean verbose, + final boolean transfer_taxonomy ) + throws IOException, SDIException, RIOException { final Phylogeny[] gene_trees = parseGeneTrees( gene_trees_file ); if ( gene_trees.length < 1 ) { throw new RIOException( "\"" + gene_trees_file + "\" is devoid of appropriate gene trees" ); } - final Phylogeny species_tree = SDIutil.parseSpeciesTree( gene_trees[ 0 ], - species_tree_file, - false, - true, - TAXONOMY_EXTRACTION.NO ); - return new RIO( gene_trees, species_tree, algorithm, rerooting, outgroup, first, last, produce_log, verbose ); + final Phylogeny species_tree = SDIutil + .parseSpeciesTree( gene_trees[ 0 ], species_tree_file, false, true, TAXONOMY_EXTRACTION.NO ); + return new RIO( gene_trees, + species_tree, + algorithm, + rerooting, + outgroup, + first, + last, + produce_log, + verbose, + transfer_taxonomy ); } - public final static RIO executeAnalysis( final IteratingPhylogenyParser p, - final File species_tree_file, + public final static RIO executeAnalysis( final File gene_trees_file, + final Phylogeny species_tree, final ALGORITHM algorithm, final REROOTING rerooting, final String outgroup, - final int first, - final int last, final boolean produce_log, - final boolean verbose ) throws IOException, SDIException, RIOException { - final Phylogeny g0 = p.next(); - if ( ( g0 == null ) || g0.isEmpty() || ( g0.getNumberOfExternalNodes() < 2 ) ) { - throw new RIOException( "input file does not seem to contain any gene trees" ); - } - final Phylogeny species_tree = SDIutil.parseSpeciesTree( g0, - species_tree_file, - false, - true, - TAXONOMY_EXTRACTION.NO ); - p.reset(); - return new RIO( p, species_tree, algorithm, rerooting, outgroup, first, last, produce_log, verbose ); + final boolean verbose, + final boolean transfer_taxonomy ) + throws IOException, SDIException, RIOException { + return new RIO( parseGeneTrees( gene_trees_file ), + species_tree, + algorithm, + rerooting, + outgroup, + DEFAULT_RANGE, + DEFAULT_RANGE, + produce_log, + verbose, + transfer_taxonomy ); } public final static RIO executeAnalysis( final File gene_trees_file, @@ -634,17 +687,52 @@ public final class RIO { final ALGORITHM algorithm, final REROOTING rerooting, final String outgroup, + final int first, + final int last, final boolean produce_log, - final boolean verbose ) throws IOException, SDIException, RIOException { + final boolean verbose, + final boolean transfer_taxonomy ) + throws IOException, SDIException, RIOException { return new RIO( parseGeneTrees( gene_trees_file ), species_tree, algorithm, rerooting, outgroup, - DEFAULT_RANGE, - DEFAULT_RANGE, + first, + last, + produce_log, + verbose, + transfer_taxonomy ); + } + + public final static RIO executeAnalysis( final IteratingPhylogenyParser p, + final File species_tree_file, + final ALGORITHM algorithm, + final REROOTING rerooting, + final String outgroup, + final int first, + final int last, + final boolean produce_log, + final boolean verbose, + final boolean transfer_taxonomy ) + throws IOException, SDIException, RIOException { + final Phylogeny g0 = p.next(); + if ( ( g0 == null ) || g0.isEmpty() || ( g0.getNumberOfExternalNodes() < 2 ) ) { + throw new RIOException( "input file does not seem to contain any gene trees" ); + } + final Phylogeny species_tree = SDIutil + .parseSpeciesTree( g0, species_tree_file, false, true, TAXONOMY_EXTRACTION.NO ); + p.reset(); + return new RIO( p, + species_tree, + algorithm, + rerooting, + outgroup, + first, + last, produce_log, - verbose ); + verbose, + transfer_taxonomy ); } public final static RIO executeAnalysis( final IteratingPhylogenyParser p, @@ -653,7 +741,9 @@ public final class RIO { final REROOTING rerooting, final String outgroup, final boolean produce_log, - final boolean verbose ) throws IOException, SDIException, RIOException { + final boolean verbose, + final boolean transfer_taxonomy ) + throws IOException, SDIException, RIOException { return new RIO( p, species_tree, algorithm, @@ -662,10 +752,11 @@ public final class RIO { DEFAULT_RANGE, DEFAULT_RANGE, produce_log, - verbose ); + verbose, + transfer_taxonomy ); } - public final static RIO executeAnalysis( final File gene_trees_file, + public final static RIO executeAnalysis( final IteratingPhylogenyParser p, final Phylogeny species_tree, final ALGORITHM algorithm, final REROOTING rerooting, @@ -673,8 +764,10 @@ public final class RIO { final int first, final int last, final boolean produce_log, - final boolean verbose ) throws IOException, SDIException, RIOException { - return new RIO( parseGeneTrees( gene_trees_file ), + final boolean verbose, + final boolean transfer_taxonomy ) + throws IOException, SDIException, RIOException { + return new RIO( p, species_tree, algorithm, rerooting, @@ -682,7 +775,8 @@ public final class RIO { first, last, produce_log, - verbose ); + verbose, + transfer_taxonomy ); } public final static RIO executeAnalysis( final Phylogeny[] gene_trees, final Phylogeny species_tree ) @@ -695,6 +789,7 @@ public final class RIO { DEFAULT_RANGE, DEFAULT_RANGE, false, + false, false ); } @@ -704,7 +799,9 @@ public final class RIO { final REROOTING rerooting, final String outgroup, final boolean produce_log, - final boolean verbose ) throws IOException, SDIException, RIOException { + final boolean verbose, + final boolean transfer_taxonomy ) + throws IOException, SDIException, RIOException { return new RIO( gene_trees, species_tree, algorithm, @@ -713,7 +810,8 @@ public final class RIO { DEFAULT_RANGE, DEFAULT_RANGE, produce_log, - verbose ); + verbose, + transfer_taxonomy ); } public final static RIO executeAnalysis( final Phylogeny[] gene_trees, @@ -724,35 +822,60 @@ public final class RIO { final int first, final int last, final boolean produce_log, - final boolean verbose ) throws IOException, SDIException, RIOException { - return new RIO( gene_trees, species_tree, algorithm, rerooting, outgroup, first, last, produce_log, verbose ); + final boolean verbose, + final boolean transfer_taxonomy ) + throws IOException, SDIException, RIOException { + return new RIO( gene_trees, + species_tree, + algorithm, + rerooting, + outgroup, + first, + last, + produce_log, + verbose, + transfer_taxonomy ); } - public final static RIO executeAnalysis( final IteratingPhylogenyParser p, - final Phylogeny species_tree, - final ALGORITHM algorithm, - final REROOTING rerooting, - final String outgroup, - final int first, - final int last, - final boolean produce_log, - final boolean verbose ) throws IOException, SDIException, RIOException { - return new RIO( p, species_tree, algorithm, rerooting, outgroup, first, last, produce_log, verbose ); + private final static void calculateOrthologTable( final Phylogeny g, final boolean sort, final int counter ) + throws RIOException { + if ( counter == 0 ) { + final List labels = new ArrayList(); + final Set labels_set = new HashSet(); + for( final PhylogenyNode n : g.getExternalNodes() ) { + final String label = obtainLabel( labels_set, n ); + labels_set.add( label ); + labels.add( label ); + } + if ( sort ) { + Collections.sort( labels ); + } + _m = new IntMatrix( labels ); + } + updateCounts( _m, counter, g ); } - private final static void checkPreconditions( final Phylogeny[] gene_trees, + private final static void checkPreconditions( final IteratingPhylogenyParser p, final Phylogeny species_tree, final REROOTING rerooting, final String outgroup, final int first, - final int last ) throws RIOException { + final int last ) + throws RIOException, IOException { + final Phylogeny g0 = p.next(); + if ( ( g0 == null ) || g0.isEmpty() ) { + throw new RIOException( "input file does not seem to contain any gene trees" ); + } + if ( g0.getNumberOfExternalNodes() < 2 ) { + throw new RIOException( "input file does not seem to contain any useable gene trees" ); + } if ( !species_tree.isRooted() ) { throw new RIOException( "species tree is not rooted" ); } if ( !( ( last == DEFAULT_RANGE ) && ( first == DEFAULT_RANGE ) ) - && ( ( last < first ) || ( last >= gene_trees.length ) || ( last < 0 ) || ( first < 0 ) ) ) { + && ( ( last < first ) || ( last < 0 ) || ( first < 0 ) ) ) { throw new RIOException( "attempt to set range (0-based) of gene to analyze to: from " + first + " to " - + last + " (out of " + gene_trees.length + ")" ); + + last ); } if ( ( rerooting == REROOTING.OUTGROUP ) && ForesterUtil.isEmpty( outgroup ) ) { throw new RIOException( "outgroup not set for midpoint rooting" ); @@ -760,13 +883,12 @@ public final class RIO { if ( ( rerooting != REROOTING.OUTGROUP ) && !ForesterUtil.isEmpty( outgroup ) ) { throw new RIOException( "outgroup only used for midpoint rooting" ); } - if ( ( rerooting == REROOTING.MIDPOINT ) - && ( PhylogenyMethods.calculateMaxDistanceToRoot( gene_trees[ 0 ] ) <= 0 ) ) { + if ( ( rerooting == REROOTING.MIDPOINT ) && ( PhylogenyMethods.calculateMaxDistanceToRoot( g0 ) <= 0 ) ) { throw new RIOException( "attempt to use midpoint rooting on gene trees which seem to have no (positive) branch lengths (cladograms)" ); } if ( rerooting == REROOTING.OUTGROUP ) { try { - gene_trees[ 0 ].getNode( outgroup ); + g0.getNode( outgroup ); } catch ( final IllegalArgumentException e ) { throw new RIOException( "cannot perform re-rooting by outgroup: " + e.getLocalizedMessage() ); @@ -774,26 +896,20 @@ public final class RIO { } } - private final static void checkPreconditions( final IteratingPhylogenyParser p, + private final static void checkPreconditions( final Phylogeny[] gene_trees, final Phylogeny species_tree, final REROOTING rerooting, final String outgroup, final int first, - final int last ) throws RIOException, IOException { - final Phylogeny g0 = p.next(); - if ( ( g0 == null ) || g0.isEmpty() ) { - throw new RIOException( "input file does not seem to contain any gene trees" ); - } - if ( g0.getNumberOfExternalNodes() < 2 ) { - throw new RIOException( "input file does not seem to contain any useable gene trees" ); - } + final int last ) + throws RIOException { if ( !species_tree.isRooted() ) { throw new RIOException( "species tree is not rooted" ); } if ( !( ( last == DEFAULT_RANGE ) && ( first == DEFAULT_RANGE ) ) - && ( ( last < first ) || ( last < 0 ) || ( first < 0 ) ) ) { + && ( ( last < first ) || ( last >= gene_trees.length ) || ( last < 0 ) || ( first < 0 ) ) ) { throw new RIOException( "attempt to set range (0-based) of gene to analyze to: from " + first + " to " - + last ); + + last + " (out of " + gene_trees.length + ")" ); } if ( ( rerooting == REROOTING.OUTGROUP ) && ForesterUtil.isEmpty( outgroup ) ) { throw new RIOException( "outgroup not set for midpoint rooting" ); @@ -801,12 +917,13 @@ public final class RIO { if ( ( rerooting != REROOTING.OUTGROUP ) && !ForesterUtil.isEmpty( outgroup ) ) { throw new RIOException( "outgroup only used for midpoint rooting" ); } - if ( ( rerooting == REROOTING.MIDPOINT ) && ( PhylogenyMethods.calculateMaxDistanceToRoot( g0 ) <= 0 ) ) { + if ( ( rerooting == REROOTING.MIDPOINT ) + && ( PhylogenyMethods.calculateMaxDistanceToRoot( gene_trees[ 0 ] ) <= 0 ) ) { throw new RIOException( "attempt to use midpoint rooting on gene trees which seem to have no (positive) branch lengths (cladograms)" ); } if ( rerooting == REROOTING.OUTGROUP ) { try { - g0.getNode( outgroup ); + gene_trees[ 0 ].getNode( outgroup ); } catch ( final IllegalArgumentException e ) { throw new RIOException( "cannot perform re-rooting by outgroup: " + e.getLocalizedMessage() ); @@ -814,21 +931,46 @@ public final class RIO { } } - private final static Phylogeny[] parseGeneTrees( final File gene_trees_file ) throws FileNotFoundException, - IOException { + private final static String obtainLabel( final Set labels_set, final PhylogenyNode n ) throws RIOException { + String label; + if ( n.getNodeData().isHasSequence() && !ForesterUtil.isEmpty( n.getNodeData().getSequence().getName() ) ) { + label = n.getNodeData().getSequence().getName(); + } + else if ( n.getNodeData().isHasSequence() + && !ForesterUtil.isEmpty( n.getNodeData().getSequence().getSymbol() ) ) { + label = n.getNodeData().getSequence().getSymbol(); + } + else if ( n.getNodeData().isHasSequence() + && !ForesterUtil.isEmpty( n.getNodeData().getSequence().getGeneName() ) ) { + label = n.getNodeData().getSequence().getGeneName(); + } + else if ( !ForesterUtil.isEmpty( n.getName() ) ) { + label = n.getName(); + } + else { + throw new RIOException( "node " + n + " has no appropriate label" ); + } + if ( labels_set.contains( label ) ) { + throw new RIOException( "label " + label + " is not unique" ); + } + return label; + } + + private final static Phylogeny[] parseGeneTrees( final File gene_trees_file ) + throws FileNotFoundException, IOException { final PhylogenyFactory factory = ParserBasedPhylogenyFactory.getInstance(); final PhylogenyParser p = ParserUtils.createParserDependingOnFileType( gene_trees_file, true ); if ( p instanceof NHXParser ) { final NHXParser nhx = ( NHXParser ) p; nhx.setReplaceUnderscores( false ); nhx.setIgnoreQuotes( true ); - nhx.setTaxonomyExtraction( NHXParser.TAXONOMY_EXTRACTION.YES ); + nhx.setTaxonomyExtraction( TAXONOMY_EXTRACTION.AGGRESSIVE ); } else if ( p instanceof NexusPhylogeniesParser ) { final NexusPhylogeniesParser nex = ( NexusPhylogeniesParser ) p; nex.setReplaceUnderscores( false ); nex.setIgnoreQuotes( true ); - nex.setTaxonomyExtraction( TAXONOMY_EXTRACTION.YES ); + nex.setTaxonomyExtraction( TAXONOMY_EXTRACTION.AGGRESSIVE ); } return factory.create( gene_trees_file, p ); } @@ -844,7 +986,35 @@ public final class RIO { } } + private final static void updateCounts( final IntMatrix m, final int counter, final Phylogeny g ) + throws RIOException { + PhylogenyMethods.preOrderReId( g ); + final HashMap map = PhylogenyMethods.createNameToExtNodeMap( g ); + for( int x = 0; x < m.size(); ++x ) { + final String mx = m.getLabel( x ); + final PhylogenyNode nx = map.get( mx ); + if ( nx == null ) { + throw new RIOException( "node \"" + mx + "\" not present in gene tree #" + counter ); + } + String my; + PhylogenyNode ny; + for( int y = 0; y < m.size(); ++y ) { + my = m.getLabel( y ); + ny = map.get( my ); + if ( ny == null ) { + throw new RIOException( "node \"" + my + "\" not present in gene tree #" + counter ); + } + if ( !PhylogenyMethods.calculateLCAonTreeWithIdsInPreOrder( nx, ny ).isDuplication() ) { + m.inreaseByOne( x, y ); + } + } + } + } + public enum REROOTING { - NONE, BY_ALGORITHM, MIDPOINT, OUTGROUP; + NONE, + BY_ALGORITHM, + MIDPOINT, + OUTGROUP; } }