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