powered by
Mathpro
str(Mathpro) attach(Mathpro) model <- lm(Sat.M1~Profic1) plot(Profic1,Sat.M1) abline(model) model detach(Mathpro) remove(model)
Run the code above in your browser using DataLab