powered by
Anxiety
attach(Anxiety) plot(anxiety,math) cor(anxiety,math) linmod <- lm(math~anxiety) abline(linmod) summary(linmod) detach(Anxiety)
Run the code above in your browser using DataLab