phylogenetics R script from SOURCE session