# Example 1. Display fit criterion values and derivatives for the
# short SweSAT multiple choice test with 24 items and 1000 examinees
chcemat <- Quant_13B_problem_dataList$chcemat
index <- Quant_13B_problem_parmList$index
SfdList <- Quant_13B_problem_parmList$SfdList
plotindex <- 1:3
indfine <- seq(0,100,len=101)
Ffuns_plot(indfine, index, SfdList, chcemat, plotindex)
Run the code above in your browser using DataLab