Code output

Code output

library(tidyverse)

ggplot(diamonds, aes(x = carat, y = price)) +
  geom_point()

Code animated

ggplot(diamonds, aes(x = carat, y = price)) +
  geom_point() +
  theme_minimal() +
  labs(title = "We need diamonds with more carrots")