# Loading the 'tcals' parameters
data(tcals)
# Selecting item parameters only
tcals <- as.matrix(tcals[,1:4])
# Item information functions and derivatives
# (various th and D values)
Ii(th=0, tcals)
Ii(th=0, tcals, D=1.702)
Ii(th=1, tcals)
Run the code above in your browser using DataLab