TreeTools (version 0.1.4)

NonDuplicateRoot: Non-duplicate root

Description

Identify, for each edge, whether it denotes a different partition from the root edge. The first edge of the input tree must be a root edge; this can be accomplished using Preorder.

Usage

NonDuplicateRoot(parent, child, nEdge = length(parent))

Arguments

parent

Integer vector corresponding to the first column of the edge matrix of a tree of class phylo, i.e. tree$edge[, 1]

child

Integer vector corresponding to the second column of the edge matrix of a tree of class phylo, i.e. tree$edge[, 2].

nEdge

(optional) integer specifying the number of edges of a tree of class phylo, i.e. dim(tree$edge)[1]

Value

NonDuplicateRoot returns a logical vector of length nEdge, specifying TRUE unless an edge identifies the same partition as the root edge.

See Also

Other tree navigation: AllAncestors(), AncestorEdge(), DescendantEdges(), EdgeAncestry(), EdgeDistances(), MRCA()

Examples

# NOT RUN {
tree <- Preorder(BalancedTree(8))
edge <- tree$edge
parent <- edge[, 1]
child <- edge[, 2]

which(!NonDuplicateRoot(parent, child))

# }