Kaiser-Meyer-Olkin sampling adequacy

Native Kaiser-Meyer-Olkin sampling adequacy from the partial-correlation anti-image matrix.

Usage

morie_psymet_kmo(data)

Arguments

data

Numeric matrix or data.frame of items.

Value

list with msa (overall) and named numeric vector items.

Examples

if (requireNamespace("psych", quietly = TRUE)) {
  set.seed(1)
  f <- rnorm(100)
  X <- sapply(1:5, function(j) sqrt(0.5) * f + sqrt(0.5) * rnorm(100))
  colnames(X) <- paste0("i", 1:5)
  res <- morie_psymet_kmo(X)
  res$msa
}
#> [1] 0.8233328