PlotTreeDriftTest: Plot results from TreeDriftTest

In evolqg: Evolutionary Quantitative Genetics

Plot results from TreeDriftTest

Description

Plot which labels reject drift hypothesis.

Usage

PlotTreeDriftTest(test.list, tree, ...)

Arguments

test.list	Output from TreeDriftTest
tree	phylogenetic tree
...	adition arguments to plot

Value

No return value, called for plot side effects

Author(s)

Diogo Melo

See Also

DriftTest TreeDriftTest

Examples

library(ape)
data(bird.orders)

tree <- bird.orders
mean.list <- llply(tree$tip.label, function(x) rnorm(5))
names(mean.list) <- tree$tip.label
cov.matrix.list <- RandomMatrix(5, length(tree$tip.label))
names(cov.matrix.list) <- tree$tip.label
sample.sizes <- runif(length(tree$tip.label), 15, 20)

test.list <- TreeDriftTest(tree, mean.list, cov.matrix.list, sample.sizes)
PlotTreeDriftTest(test.list, tree)

evolqg documentation built on Aug. 8, 2023, 5:12 p.m.