# NOT RUN {
library(TestDesign)
config <- createShadowTestConfig(
final_theta = list(method = "MLE"),
exclude_policy = list(method = "SOFT", M = 100)
)
examinee_list <- maat(
examinee_list = examinee_list_math,
assessment_structure = assessment_structure_math,
module_list = module_list_math,
overlap_control_policy = "all",
transition_CI_alpha = 0.05,
config = config,
cut_scores = cut_scores_math
)
plot(examinee_list, type = "route")
plot(examinee_list, type = "correlation")
plot(examinee_list, type = "audit", examinee_id = 1)
# }
Run the code above in your browser using DataLab