cor(Sophomor)
plot(exam ~ gpa, data = Sophomor)
if (FALSE) {
library(ggplot2)
ggplot2::ggplot(data = Sophomor, aes(x = gpa, y = exam)) +
geom_point()
ggplot2::ggplot(data = Sophomor, aes(x = sat, y = exam)) +
geom_point()
}
Run the code above in your browser using DataLab