Function to calculate the empirical (marginal) reliability
Source:R/empirical_rxx.R
empirical_rxx.Rd
Given secondary latent trait estimates and their associated standard errors
returned from fscores
, compute the empirical reliability.
Arguments
- Theta_SE
a matrix of latent trait estimates returned from
fscores
with the optionsfull.scores = TRUE
andfull.scores.SE = TRUE
- T_as_X
logical; should the observed variance be equal to
var(X) = var(T) + E(E^2)
orvar(X) = var(T)
when computing empirical reliability estimates? Default (FALSE
) uses the former
References
Chalmers, R., P. (2012). mirt: A Multidimensional Item Response Theory Package for the R Environment. Journal of Statistical Software, 48(6), 1-29. doi:10.18637/jss.v048.i06
Author
Phil Chalmers rphilip.chalmers@gmail.com
Examples
if (FALSE) { # \dontrun{
dat <- expand.table(deAyala)
itemstats(dat)
mod <- mirt(dat)
theta_se <- fscores(mod, full.scores.SE = TRUE)
empirical_rxx(theta_se)
theta_se <- fscores(mod, full.scores.SE = TRUE, method = 'ML')
empirical_rxx(theta_se)
empirical_rxx(theta_se, T_as_X = TRUE)
} # }