model <- lm(mpg ~ 1, data = mtcars)
is_nullmodel(model)
model <- lm(mpg ~ gear, data = mtcars)
is_nullmodel(model)
data(sleepstudy, package = "lme4")
model <- lme4::lmer(Reaction ~ 1 + (Days | Subject), data = sleepstudy)
is_nullmodel(model)
model <- lme4::lmer(Reaction ~ Days + (Days | Subject), data = sleepstudy)
is_nullmodel(model)
Run the code above in your browser using DataLab