powered by
p7.2
data(p7.2)
data(p7.2) y.lm <- lm(y ~ x + I(x^2), data=p7.2) summary(y.lm) plot(y ~ x, data=p7.2)
Run the code above in your browser using DataLab