# \donttest{
data(krokfors)
set.seed(1)
t_obj <- tournament(Q ~ W, krokfors, num_cores = 2)
summary(t_obj)
# Re-run summary with different method
summary(t_obj, method = "DIC")
# Re-run summary with different winning criteria
summary(t_obj, winning_criteria = "Delta_WAIC > 3")
# }
Run the code above in your browser using DataLab