For each block, convergence plots display efficiency of design, violations of the equivalence theorem, the step length used vs. iteration number. These plots are suitable for monitoring the convergence of the optimal item calibration algorithm.

convergenceplot(yyy, refline = c(0.002, 1e-05))

Arguments

yyy

an optical object; the output of a call optical().

refline

reference line.

Value

A convergence plot is displayed.

Details

Convergence plots have three panels.

  • First panel monitors efficiency of design vs. iteration number.

  • Second panel monitors violations of equivalence theorem vs. iteration number.

  • Third panel monitors step size used vs. iteration number.

Examples

# Example No.1
# 2PL-model for three items with parameters (a, b) equal to (1.6, -2), (1.6, 0.5),
# and (1.6, 2) for the first, second, and third items, respectively.

ip <- cbind(c(1.6, 1.6,1.6),c(-2, 0.5,2))
yyy <- optical(ip)
convergenceplot(yyy, refline=c(0.002, 0.001*0.005/0.45))


if (FALSE) {

# Example No.2
# 2PL-models for six items; parameters a=(1.62, 1.4, 0.98, 0.66, 0.92, 0.9),
# and b=(-0.47, -1.71, 0.62, -0.15, -1.71, 1.6), respectively.

a<-c(1.62, 1.4,0.98,0.66,0.92,0.9)
b<-c(-0.47,-1.71,0.62,-0.15,-1.71,1.6)
ip<-cbind(a,b)
bid<-c(1,1,1,2,2,2)
yyy <- optical(ip,bid=bid,show_progress=2)
convergenceplot(yyy, refline=c(0.002, 0.001*0.005/0.45))

}