unitLengthTree(tree)
timePaleoPhy
See also speciationalTree
in the package geiger, which does
essentially the same thing as unitLengthTree.set.seed(444)
tree <- rtree(10)
layout(1:2)
plot(tree)
plot(unitLengthTree(tree))
layout(1)
Run the code above in your browser using DataLab