# NOT RUN {
# Compute prob(ability), info(rmation), lik(elihood) and loglik(elihood)
x <- irt_model("3pl")$gendata(20, 5)
irt_stats(x, "prob")
irt_stats(x, "prob", "people", sum)
irt_stats(x, "info")
irt_stats(x, "info", "items", sum)
irt_stats(x, "lik")
irt_stats(x, "loglik")
# }
Run the code above in your browser using DataLab