powered by
dpv(resp, ip, mu=0, sigma=1, n=5)
method="ML"
n
mlebme
eap
data(Scored) p.2pl <- est(Scored, model="2PL", engine="ltm") plval <- dpv(resp=Scored, ip=p.2pl)
Run the code above in your browser using DataLab