#############################################################################
# EXAMPLE 1: DINA model item fit
#############################################################################
data(sim.dina)
data(sim.qmatrix)
# estimate model
mod1 <- din(sim.dina, sim.qmatrix)
# compute item fit
IRT.itemfit( mod1 )
Run the code above in your browser using DataLab