# NOT RUN {
library(report)
# Bayesian models
# }
# NOT RUN {
if (require("brms")) {
model <- brm(mpg ~ qsec + wt, data = mtcars, refresh = 0, iter = 300)
r <- report(model)
r
summary(r)
as.data.frame(r)
summary(as.data.frame(r))
}
# }
Run the code above in your browser using DataLab