McDonald's omega total and hierarchical

Native principal-axis approximation of McDonald's omega (total + hierarchical).

Usage

morie_psymet_omega(data, nf = 1)

Arguments

data

Numeric matrix / data.frame of items.

nf

Number of factors (default 1).

Value

list with total, hier, alpha, nf, expvar.

Examples

set.seed(1)
f <- rnorm(120)
X <- sapply(1:12, function(j) sqrt(0.5) * f + sqrt(0.5) * rnorm(120))
colnames(X) <- paste0("i", 1:12)
res <- morie_psymet_omega(X, nf = 4)
c(res$total, res$hier)
#> [1] 0.9452500 0.9997217