# NOT RUN {
## import lmerTest package
library(lmerTest)
## an object of class merModLmerTest
m <- lmer(Informed.liking ~ Gender+Information+Product +(1|Consumer), data=ham)
## gives summary of lmer object. The same as of class merMod but with
## additional p-values calculated based on Satterthwate's approximations
summary(m)
## anova table the same as of class merMod but with additional F statistics and
## and denominator degrees of freedom and
## p-values calculated based on Satterthwaite's approximations
anova(m)
## anova table the same as of class merMod but with additional F statistics and
## denominator degrees of freedom and
## p-values calculated based on Kenward-Roger's approximations
# }
# NOT RUN {
if(requireNamespace("pbkrtest", quietly = TRUE))
anova(m, ddf = "Kenward-Roger")
# }
# NOT RUN {
## anova table of class merMod
anova(m, ddf="lme4")
## backward elimination of non-significant effects of model m
st <- step(m)
plot(st)
# }
Run the code above in your browser using DataLab