powered by
E1.1
data(E1.1)
data(E1.1) attach(E1.1) plot(DENSITY, sqrt(SPEED)) E1.1.m1 <- lm(sqrt(SPEED) ~ DENSITY + I(DENSITY^2), data=E1.1) summary(E1.1.m1)
Run the code above in your browser using DataLab