powered by
Iqgpa
str(Iqgpa) attach(Iqgpa) plot(IQ,GPA) model <- lm(GPA~IQ) abline(model) summary(model) detach(Iqgpa) remove(model)
Run the code above in your browser using DataLab