ggplot2

library(ggplot2)
ggplot(mpg, aes(x = displ, y = hwy)) + geom_point()

ggplot(mpg, aes(cty, hwy)) + geom_point()

ggplot(diamonds, aes(carat, price)) + geom_point()

ggplot(economics, aes(date, unemploy)) + geom_line()

ggplot(mpg, aes(cty)) + geom_histogram()

## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.