powered by
Collect the normalized number of lineages from the stem age
get_norm_n(phylogeny)
branching times, in time units before the present
a phylogeny of class 'phylo'
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))
Run the code above in your browser using DataLab