powered by
Toaster
str(Toaster) attach(Toaster) plot(score,cost) model <- lm(cost~score) abline(model) summary(model) rm(model) detach(Toaster)
Run the code above in your browser using DataLab