Small helper that checks if a model is a mixed effects model,
i.e. if it the model has random effects.
Arguments
- x
A model object.
Value
A logical, TRUE
if x
is a mixed model.
Examples
data(mtcars)
model <- lm(mpg ~ wt + cyl + vs, data = mtcars)
is_mixed_model(model)
#> [1] FALSE
if (require("lme4")) {
data(sleepstudy)
model <- lmer(Reaction ~ Days + (1 | Subject), data = sleepstudy)
is_mixed_model(model)
}
#> [1] TRUE