get_branching_times {nLTT}

Collect the branching times from the stem age

Description

Collect the branching times from the stem age

Usage

get_branching_times(phylogeny)

Arguments

phylogeny

a phylogeny of class 'phylo'

Value

branching times, in time units before the present

Author(s)

Richèl Bilderbeek

Examples

  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))