###########################################################
# different parametrizations for ordered data
data( data.gpcm )
resp <- data.gpcm
# parametrization for partial credit model
A1 <- designMatrices( resp= resp )$A
# item difficulty and threshold parametrization
A2 <- .A.PCM2( resp )
# dispersion model of Andrich (1982)
A3 <- .A.PCM3( resp )
# rating scale model
A4 <- designMatrices( resp= resp , modeltype="RSM" )$A
Run the code above in your browser using DataLab