get_branching_times {nLTT} | R Documentation |
Collect the branching times from the stem age
get_branching_times(phylogeny)
phylogeny |
a phylogeny of class 'phylo' |
branching times, in time units before the present
Richèl Bilderbeek
phylogeny <- ape::read.tree(text = "((a:2,b:2):1,c:3);")
phylogeny$root.edge <- 2 # nolint ape variable name
all.equal(as.vector(nLTT::get_branching_times(phylogeny)), c(5, 3, 2))