powered by
marginal_rxx(mod, density = dnorm, theta_lim = c(-6, 6), ...)
'SingleGroupClass'
extract.group
testinfo
dat <- expand.table(deAyala) mod <- mirt(dat, 1) # marginal estimate marginal_rxx(mod) # empirical estimate (assuming the same prior) fscores(mod, returnER = TRUE)
Run the code above in your browser using DataLab