#
# EPage 240
#
# Written by:
# -- 
# John L. Weatherwax                2009-04-21
# 
# email: wax@alum.mit.edu
# 
# Please send comments and especially bug reports to the
# above email address.
# 
#-----

library(DAAG)

roller.lm = lm(depression ~ weight, data=roller)
roller.lm2 = lm(depression ~ weight + I(weight^2), data=roller)
anova( roller.lm, roller.lm2 )