require(lmerTest)
m <- lmer(Informed.liking ~ Gender+Information+Product +(1|Consumer), data=ham)
anova(m)
anova(m, ddf="sat")
anova(m, ddf="SA")
anova(m, ddf="kenw")
anova(m, ddf="lme4")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.