| addFossil {ppgm} | R Documentation |
addFossil
Description
Adds a fossil as a tip to a specified phylogeny given either an age range that the fossil occurs in, a specific edge that the fossil diverged from, or both. If the specific edge placement for the fossil is unknown, then this function randomly places the fossil on any edge that is within the age range.
Usage
addFossil(tree, mintime = 0, maxtime = NA, name = "fossil", edge = NA)
Arguments
tree |
An object of the class "phylo" |
mintime |
The minimum age of the fossil. If no minimum time is specified, the default value is 0. |
maxtime |
The maximum age of the fossil. If no maximum time is specified, the default value is the maximum tree age. |
name |
The name of the fossil to appear as a tip.label. |
edge |
The edge on the tree where the fossil presumably diverged. If no edge is specified, then the function randomly selects an edge within the age range of the fossil. |
Details
There are several random components to this function. First, if an edge is not specified to place a fossil, then an edge is randomly selected that is within the age range of the fossil. Second, the exact placement of the node leading to the fossil is randomly selected within the age range specified. Third, the length of the edge leading to the fossil is randomly selected with constraints on the maximum length of the edge, where the maximum length of the edge cannot render the fossil younger than the minimum time of occurrence as specified in the mintime argument.
Value
An object of the class "phylo".
Author(s)
A. Michelle Lawing, Alexandra F. C. Howard
Examples
mytree <- phytools::pbtree(n=20)
newtree <- addFossil(mytree, mintime = max(mytree$edge.length)/2, maxtime= max(mytree$edge.length))
plot(newtree)