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