R/plot.unidimTest.R

Defines functions plot.unidimTest

plot.unidimTest <-
function (x, xlab = "Eigenvalue number", ylab = "Eigenvalue", ...) {
    y1 <- x$Tobs
    y2 <- colMeans(x$T.boot, na.rm = TRUE)
    x <- seq_along(y1)
    matplot(x, cbind(y1, y2), xlab = xlab, ylab = ylab, ...)
    invisible()
}
drizopoulos/ltm documentation built on April 19, 2018, 2:37 a.m.