if (FALSE) { # require("rstanarm") && require("rstantools")
# \donttest{
model <- suppressWarnings(rstanarm::stan_glm(
mpg ~ wt + cyl,
data = mtcars,
chains = 1,
iter = 500,
refresh = 0
))
model_performance(model)
model <- suppressWarnings(rstanarm::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