powered by
MDISC(x)
extract.group
mod <- mirt(Science, 2) MDISC(mod)
Run the code above in your browser using DataLab