library(dplyr) library(ggplot2)
책 내용~~
ggplot(data = mpg, mapping = aes(x = displ, y = hwy)) + geom_point(aes(color = class))