powered by
Data for Exercise 9.9
Magnesiu
A data frame with 20 observations on the following 4 variables.
distance
a numeric vector
magnesiu
SRES1
FITS1
# NOT RUN { str(Magnesiu) attach(Magnesiu) model <- lm(magnesiu~distance) plot(distance,magnesiu) abline(model) summary(model) detach(Magnesiu) remove(model) # }
Run the code above in your browser using DataLab