# Example 1:
# Compute the first and second derivative values of the objective function
# for locating each examinee for the 24-item short form of the
# SweSAT quantitative test on the percentile score index continuum.
# Use only the first five examinees.
chcemat <- Quant_13B_problem_dataList$chcemat
SfdList <- Quant_13B_problem_parmList$SfdList
index <- Quant_13B_problem_parmList$index
DFfunResult <- DFfun(index[1:5], SfdList, chcemat[1:5,])
DFval <- DFfunResult$DF
D2Fval <- DFfunResult$D2F
Run the code above in your browser using DataLab