# Not yet used, kept for the future
# SMT_options <- function(next_item.criterion,
# next_item.estimator,
# next_item.prior_dist = next_item.prior_dist,
# next_item.prior_par = next_item.prior_par,
# final_ability.estimator,
# constrain_answers = FALSE,
# eligible_first_items = NULL,
# item_bank) {
# psychTestRCAT::adapt_test_options(
# next_item.criterion = next_item.criterion,
# next_item.estimator = next_item.estimator,
# next_item.prior_dist = next_item.prior_dist,
# next_item.prior_par = next_item.prior_par,
# final_ability.estimator = final_ability.estimator,
# eligible_first_items = eligible_first_items,
# constrain_answers = constrain_answers,
# avoid_duplicates = NULL
# )
# }
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.