squeeze_root: Slices a phylogenetic tree following a 'rootward' orientation
Description
This function slices a phylogenetic tree in a 'rootward' orientation, starting from the root and moving towards the tips of the tree.
Usage
squeeze_root(tree, time, criterion = "my", dropNodes = FALSE)
Value
The function returns a time-slice of an inputted phylogenetic tree in the "phylo" format, following a 'rootward' orientation.
Arguments
tree
phylo. An ultrametric phylogenetic tree in the "phylo" format.
time
numeric. A value that determines the time, or accumulated phylogenetic diversity (PD), at which the tree should be cut.
criterion
character string. The method for cutting the tree. It can be either "my" (million years) or "PD" (accumulated phylogenetic diversity). Default is "my".
dropNodes
logical. A logical value indicating whether the nodes that were sliced (void nodes, presenting no branch length) should be preserved in the node matrix. Default is FALSE.
# Generate a random treetree <- ape::rcoal(20)
# Slice "rootwardly" the phylogeny at 0.1 million yearstree <- squeeze_root(tree, time = 0.1)
# Plot itplot(tree)