if (FALSE) {
library(ape)
set.seed(22)
rtree(100)->tree
3->age
cutPhylo(tree,age=age)->t1
cutPhylo(tree,age=age,keep.lineage=FALSE)->t1
cutPhylo(tree,node=151)->t2
cutPhylo(tree,node=151,keep.lineage=FALSE)->t2
}
Run the code above in your browser using DataLab