rio
[jalview.git] / forester / java / src / org / forester / sdi / GSDIR.java
1 // $Id:\r
2 // FORESTER -- software libraries and applications\r
3 // for evolutionary biology research and applications.\r
4 //\r
5 // Copyright (C) 2008-2013 Christian M. Zmasek\r
6 // All rights reserved\r
7 //\r
8 // This library is free software; you can redistribute it and/or\r
9 // modify it under the terms of the GNU Lesser General Public\r
10 // License as published by the Free Software Foundation; either\r
11 // version 2.1 of the License, or (at your option) any later version.\r
12 //\r
13 // This library is distributed in the hope that it will be useful,\r
14 // but WITHOUT ANY WARRANTY; without even the implied warranty of\r
15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU\r
16 // Lesser General Public License for more details.\r
17 //\r
18 // You should have received a copy of the GNU Lesser General Public\r
19 // License along with this library; if not, write to the Free Software\r
20 // Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA\r
21 //\r
22 // Contact: phylosoft @ gmail . com\r
23 // WWW: www.phylosoft.org\r
24 \r
25 package org.forester.sdi;\r
26 \r
27 import java.util.ArrayList;\r
28 import java.util.List;\r
29 import java.util.Set;\r
30 import java.util.SortedSet;\r
31 \r
32 import org.forester.phylogeny.Phylogeny;\r
33 import org.forester.phylogeny.PhylogenyBranch;\r
34 import org.forester.phylogeny.PhylogenyMethods;\r
35 import org.forester.phylogeny.PhylogenyNode;\r
36 import org.forester.phylogeny.iterators.PhylogenyNodeIterator;\r
37 import org.forester.sdi.SDIutil.TaxonomyComparisonBase;\r
38 import org.forester.util.BasicDescriptiveStatistics;\r
39 \r
40 public class GSDIR implements GSDII {\r
41 \r
42     private final int _min_duplications_sum;\r
43     private final int _speciations_sum;\r
44 \r
45     @Override\r
46     public int getSpeciationsSum() {\r
47         return _speciations_sum;\r
48     }\r
49     private final BasicDescriptiveStatistics _duplications_sum_stats;\r
50     private final List<Phylogeny>            _min_duplications_sum_gene_trees;\r
51     private final List<PhylogenyNode>        _stripped_gene_tree_nodes;\r
52     private final List<PhylogenyNode>        _stripped_species_tree_nodes;\r
53     private final Set<PhylogenyNode>         _mapped_species_tree_nodes;\r
54     private final TaxonomyComparisonBase     _tax_comp_base;\r
55     private final SortedSet<String>          _scientific_names_mapped_to_reduced_specificity;\r
56 \r
57     public GSDIR( final Phylogeny gene_tree,\r
58                   final Phylogeny species_tree,\r
59                   final boolean strip_gene_tree,\r
60                   final boolean strip_species_tree ) throws SDIException {\r
61         final NodesLinkingResult nodes_linking_result = GSDI.linkNodesOfG( gene_tree,\r
62                                                                            species_tree,\r
63                                                                            null,\r
64                                                                            strip_gene_tree,\r
65                                                                            strip_species_tree );\r
66         _stripped_gene_tree_nodes = nodes_linking_result.getStrippedGeneTreeNodes();\r
67         _stripped_species_tree_nodes = nodes_linking_result.getStrippedSpeciesTreeNodes();\r
68         _mapped_species_tree_nodes = nodes_linking_result.getMappedSpeciesTreeNodes();\r
69         _scientific_names_mapped_to_reduced_specificity = nodes_linking_result\r
70                 .getScientificNamesMappedToReducedSpecificity();\r
71         _tax_comp_base = nodes_linking_result.getTaxCompBase();\r
72         final List<PhylogenyBranch> gene_tree_branches_post_order = new ArrayList<PhylogenyBranch>();\r
73         for( final PhylogenyNodeIterator it = gene_tree.iteratorPostorder(); it.hasNext(); ) {\r
74             final PhylogenyNode n = it.next();\r
75             if ( !n.isRoot() /*&& !( n.getParent().isRoot() && n.isFirstChildNode() )*/) {\r
76                 gene_tree_branches_post_order.add( new PhylogenyBranch( n, n.getParent() ) );\r
77             }\r
78         }\r
79         int min_duplications_sum = Integer.MAX_VALUE;\r
80         int speciations_sum = 0;\r
81         _min_duplications_sum_gene_trees = new ArrayList<Phylogeny>();\r
82         _duplications_sum_stats = new BasicDescriptiveStatistics();\r
83         for( final PhylogenyBranch branch : gene_tree_branches_post_order ) {\r
84             gene_tree.reRoot( branch );\r
85             PhylogenyMethods.preOrderReId( species_tree );\r
86             //TEST, remove later\r
87             //            for( final PhylogenyNodeIterator it = _gene_tree.iteratorPostorder(); it.hasNext(); ) {\r
88             //                final PhylogenyNode g = it.next();\r
89             //                if ( g.isInternal() ) {\r
90             //                    g.setLink( null );\r
91             //                }\r
92             //            }\r
93             final GSDIsummaryResult gsdi_result = GSDI.geneTreePostOrderTraversal( gene_tree, true );\r
94             if ( gsdi_result.getDuplicationsSum() < min_duplications_sum ) {\r
95                 min_duplications_sum = gsdi_result.getDuplicationsSum();\r
96                 speciations_sum = gsdi_result.getSpeciationsSum();\r
97                 _min_duplications_sum_gene_trees.clear();\r
98                 _min_duplications_sum_gene_trees.add( gene_tree.copy() );\r
99                 //_speciations_sum\r
100             }\r
101             else if ( gsdi_result.getDuplicationsSum() == min_duplications_sum ) {\r
102                 _min_duplications_sum_gene_trees.add( gene_tree.copy() );\r
103             }\r
104             _duplications_sum_stats.addValue( gsdi_result.getDuplicationsSum() );\r
105         }\r
106         _min_duplications_sum = min_duplications_sum;\r
107         _speciations_sum = speciations_sum;\r
108     }\r
109 \r
110     public int getMinDuplicationsSum() {\r
111         return _min_duplications_sum;\r
112     }\r
113 \r
114     public List<Phylogeny> getMinDuplicationsSumGeneTrees() {\r
115         return _min_duplications_sum_gene_trees;\r
116     }\r
117 \r
118     public BasicDescriptiveStatistics getDuplicationsSumStats() {\r
119         return _duplications_sum_stats;\r
120     }\r
121 \r
122     @Override\r
123     public Set<PhylogenyNode> getMappedExternalSpeciesTreeNodes() {\r
124         return _mapped_species_tree_nodes;\r
125     }\r
126 \r
127     @Override\r
128     public final SortedSet<String> getReMappedScientificNamesFromGeneTree() {\r
129         return _scientific_names_mapped_to_reduced_specificity;\r
130     }\r
131 \r
132     @Override\r
133     public List<PhylogenyNode> getStrippedExternalGeneTreeNodes() {\r
134         return _stripped_gene_tree_nodes;\r
135     }\r
136 \r
137     @Override\r
138     public List<PhylogenyNode> getStrippedSpeciesTreeNodes() {\r
139         return _stripped_species_tree_nodes;\r
140     }\r
141 \r
142     @Override\r
143     public TaxonomyComparisonBase getTaxCompBase() {\r
144         return _tax_comp_base;\r
145     }\r
146 \r
147     public final static List<Integer> getIndexesOfShortestTree( final List<Phylogeny> assigned_trees ) {\r
148         final List<Integer> shortests = new ArrayList<Integer>();\r
149         boolean depth = true;\r
150         double x = Double.MAX_VALUE;\r
151         for( int i = 0; i < assigned_trees.size(); ++i ) {\r
152             final Phylogeny phy = assigned_trees.get( i );\r
153             if ( i == 0 ) {\r
154                 if ( PhylogenyMethods.calculateMaxDistanceToRoot( phy ) > 0 ) {\r
155                     depth = false;\r
156                 }\r
157             }\r
158             final double d;\r
159             if ( depth ) {\r
160                 d = PhylogenyMethods.calculateMaxDepth( phy );\r
161             }\r
162             else {\r
163                 d = PhylogenyMethods.calculateMaxDistanceToRoot( phy );\r
164             }\r
165             if ( d < x ) {\r
166                 x = d;\r
167                 shortests.clear();\r
168                 shortests.add( i );\r
169             }\r
170             else if ( d == x ) {\r
171                 shortests.add( i );\r
172             }\r
173         }\r
174         return shortests;\r
175     }\r
176 }\r