# NOT RUN {
fit <- brm(count ~ Trt, data = epilepsy)
# add both LOO and WAIC at once
fit <- add_criterion(fit, c("loo", "waic"))
print(fit$criteria$loo)
print(fit$criteria$waic)
# }
# NOT RUN {
# }
Run the code above in your browser using DataCamp Workspace