#############################################################################
# EXAMPLE 1: Ideal response pattern sim.qmatrix
#############################################################################
data(sim.qmatrix, package="CDM")
q.matrix <- sim.qmatrix
#- ideal response pattern for DINA model
CDM::ideal.response.pattern(q.matrix)
#- ideal response pattern for DINO model
CDM::ideal.response.pattern( q.matrix, rule="DINO" )
# compute ideal responses for a reduced skill space
skillspace <- matrix( c( 0,1,0,
1,1,0 ), 2,3, byrow=TRUE )
CDM::ideal.response.pattern( q.matrix, skillspace=skillspace)
Run the code above in your browser using DataLab