# NOT RUN {
m <- lm(mpg ~ wt + cyl + gear + disp, data = mtcars)
check_model(m)
if (require("lme4")) {
m <- lmer(Reaction ~ Days + (Days | Subject), sleepstudy)
check_model(m, panel = FALSE)
}
if (require("rstanarm")) {
m <- stan_glm(mpg ~ wt + gear, data = mtcars, chains = 2, iter = 200)
check_model(m)
}
# }
Run the code above in your browser using DataLab