pprint(anova(lm(weight ~ Diet, data = ChickWeight)),
format = "anova")
pprint(anova(lm(weight ~ Diet, data = ChickWeight),
lm(weight ~ Diet + Time, data = ChickWeight)),
format = "anova",
effect = 2)
Run the code above in your browser using DataLab