# NOT RUN {
assessment_structure <- createAssessmentStructure(
n_test = 3,
n_phase = 2,
route_limit_below = 0,
route_limit_above = 2
)
examinee_list <- simExaminees(
N = 5,
mean_v = c(0, 0, 0),
sd_v = c(1, 1, 1),
cor_v = diag(1, 3),
assessment_structure = assessment_structure
)
fn <- system.file("extdata", "module_definition_MATH_normal_N500_flexible.csv", package = "maat")
pkg_path <- system.file(package = "maat")
module_list <- loadModules(
fn,
base_path = pkg_path,
assessment_structure = assessment_structure,
examinee_list = examinee_list
)
# }
Run the code above in your browser using DataLab