mislabel function

Switch labels acoording to mislabeling probabilities

mislabel(atree, psi)

Arguments

• atree: An object of class aphylo .
• psi: Numeric vector of length 2. Misclasification probabilities. (see LogLike).

Returns

An object of class aphylo with modified labels.

Examples

set.seed(131)
x <- raphylo(5, P=2, psi=c(0,0))
x$tip.annotation

# Flipping 0s to 1s and vice versa
mislabel(x, psi = c(1,1))$tip.annotation