009_scatter_plots

scatterplots.R

ggplot(mtcars, aes(x = mpg, y = hp)) + 
  geom_point(color = "#0099f9", size = 5) +
  geom_point(aes(size = qsec, color = cyl)) +
  labs(
    title = "Miles per Gallon vs. Horse Power",
    subtitle = "Color - Number of cylinders; Size - 1/4 mile time",
    caption = "Source: MTCars dataset"
  )