# \donttest{
# Fit a model with trace enabled
mod <- compute_sequentially(
complete_rankings,
hyperparameters = set_hyperparameters(n_items = 5),
smc_options = set_smc_options(
n_particles = 100,
n_particle_filters = 1,
trace = TRUE
)
)
# Create trace plot for alpha (default)
trace_plot(mod)
# }
Run the code above in your browser using DataLab