#############################################################################
# EXAMPLE 1: sim.rasch - Different factor scores in Rasch model
#############################################################################
data(sim.rasch)
# 1PL estimation
mod1 <- tam.mml(resp=sim.rasch)
# EAP
pmod1 <- IRT.factor.scores( mod1 )
# WLE
pmod1 <- IRT.factor.scores( mod1 , type="WLE" )
# MLE
pmod1 <- IRT.factor.scores( mod1 , type="MLE" )
Run the code above in your browser using DataLab