import java.util.SortedSet;
import java.util.TreeSet;
+import org.forester.archaeopteryx.Archaeopteryx;
+import org.forester.evoinference.distance.NeighborJoiningF;
+import org.forester.evoinference.distance.PairwiseDistanceCalculator;
+import org.forester.evoinference.distance.PairwiseDistanceCalculator.PWD_DISTANCE_METHOD;
+import org.forester.evoinference.matrix.distance.BasicSymmetricalDistanceMatrix;
+import org.forester.evoinference.tools.BootstrapResampler;
+import org.forester.msa.BasicMsa;
import org.forester.msa.Mafft;
import org.forester.msa.Msa;
import org.forester.msa.Msa.MSA_FORMAT;
import org.forester.msa.MsaInferrer;
import org.forester.msa.MsaMethods;
+import org.forester.msa.ResampleableMsa;
+import org.forester.phylogeny.Phylogeny;
+import org.forester.phylogeny.PhylogenyMethods;
import org.forester.sequence.Sequence;
+import org.forester.tools.ConfidenceAssessor;
import org.forester.util.ForesterUtil;
public class MsaCompactor {
final MsaInferrer mafft = Mafft
.createInstance( "/home/czmasek/SOFTWARE/MSA/MAFFT/mafft-7.130-without-extensions/scripts/mafft" );
final List<String> opts = new ArrayList<String>();
- // opts.add( "--maxiterate" );
- // opts.add( "1000" );
- // opts.add( "--localpair" );
+ opts.add( "--maxiterate" );
+ opts.add( "1000" );
+ opts.add( "--localpair" );
opts.add( "--quiet" );
_msa = mafft.infer( _msa.asSequenceList(), opts );
}
}
}
+ Phylogeny pi( final String matrix ) {
+ final Phylogeny master_phy = inferNJphylogeny( PWD_DISTANCE_METHOD.KIMURA_DISTANCE, _msa, true, matrix );
+ final int seed = 15;
+ final int n = 100;
+ final ResampleableMsa resampleable_msa = new ResampleableMsa( ( BasicMsa ) _msa );
+ final int[][] resampled_column_positions = BootstrapResampler.createResampledColumnPositions( _msa.getLength(),
+ n,
+ seed );
+ final Phylogeny[] eval_phys = new Phylogeny[ n ];
+ for( int i = 0; i < n; ++i ) {
+ resampleable_msa.resample( resampled_column_positions[ i ] );
+ eval_phys[ i ] = inferNJphylogeny( PWD_DISTANCE_METHOD.KIMURA_DISTANCE, resampleable_msa, false, null );
+ }
+ ConfidenceAssessor.evaluate( "bootstrap", eval_phys, master_phy, true, 1 );
+ PhylogenyMethods.extractFastaInformation( master_phy );
+ return master_phy;
+ }
+
+ private Phylogeny inferNJphylogeny( final PWD_DISTANCE_METHOD pwd_distance_method,
+ final Msa msa,
+ final boolean write_matrix,
+ final String matrix_name ) {
+ BasicSymmetricalDistanceMatrix m = null;
+ switch ( pwd_distance_method ) {
+ case KIMURA_DISTANCE:
+ m = PairwiseDistanceCalculator.calcKimuraDistances( msa );
+ break;
+ case POISSON_DISTANCE:
+ m = PairwiseDistanceCalculator.calcPoissonDistances( msa );
+ break;
+ case FRACTIONAL_DISSIMILARITY:
+ m = PairwiseDistanceCalculator.calcFractionalDissimilarities( msa );
+ break;
+ default:
+ throw new IllegalArgumentException( "invalid pwd method" );
+ }
+ if ( write_matrix ) {
+ try {
+ m.write( ForesterUtil.createBufferedWriter( matrix_name ) );
+ }
+ catch ( final IOException e ) {
+ // TODO Auto-generated catch block
+ e.printStackTrace();
+ }
+ }
+ final NeighborJoiningF nj = NeighborJoiningF.createInstance( false, 5 );
+ final Phylogeny phy = nj.execute( m );
+ return phy;
+ }
+
final private void removeWorstOffenders( final int to_remove,
final int step,
final boolean realign,
final boolean norm ) throws IOException, InterruptedException {
+ final Phylogeny a = pi( "a.pwd" );
+ Archaeopteryx.createApplication( a );
final GapContribution stats[] = calcGapContribtionsStats( norm );
final List<String> to_remove_ids = new ArrayList<String>();
for( int j = 0; j < to_remove; ++j ) {
if ( realign ) {
mafft();
}
+ final Phylogeny b = pi( "b.pwd" );
+ Archaeopteryx.createApplication( b );
}
final private void writeMsa( final String outfile, final MSA_FORMAT format ) throws IOException {