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