R/components.R

Defines functions components

Documented in components

components <- function(x, ...) UseMethod("components")

components.ictest <- function (x, which="all", ...)
{
 which <- match.arg(which, c("all", "k"))
 if (which=="all") {S <- x$S} else {S <- x$S[ ,0:x$k, drop=FALSE]}
 S
}

Try the ICtest package in your browser

Any scripts or data that you put into this service are public.

ICtest documentation built on May 18, 2022, 9:05 a.m.