# NOT RUN {
if (require("rstanarm")) {
model <- stan_glm(mpg ~ wt + cyl, data = mtcars, chains = 1, iter = 500, refresh = 0)
model_performance(model)
model <- stan_glmer(
mpg ~ wt + cyl + (1 | gear),
data = mtcars,
chains = 1,
iter = 500,
refresh = 0
)
model_performance(model)
}
# }
Run the code above in your browser using DataLab