# \donttest{
if (requireNamespace("rstan", quietly = TRUE)) {
sim <- simulate_data(ind = 50, Valpha = 0.2, Vepsilon = 0.1, iterations = 2)
res <- run_model(sim, model = "Trait.stan", iter = 100, cores = 2)
summarise_results(res)
} else {
message("rstan not available; example skipped.")
}
# }
Run the code above in your browser using DataLab