n_subj <- 100 # number of students
n_vars <- 20 # number of questionnaire variables
n_forms <- 1 # number of test forms
form_len <- 10 # number of items per form
n_items <- n_forms * form_len # number of total items
=== Survey data ==============================================================
I rewrote the function (now called gen_proportions) so the user specifies the number of items corresponding to each cat_options rather than specifying proportions of items corresponding to each cat_options.
Error in sample.int(x, size, replace, prob) : incorrect number of probabilities
Error in questionnaire(n = n_subj, cat_prop = cat_pr1, cor_matrix = q1) : object 'cat_pr1' not found