Capítulo 11 Leyendas

library(reticulate)
library(gcookbook)
library(ggplot2)
library(dplyr)
pg_plot <- ggplot(CO2, aes(x = conc, y = uptake, fill = Plant)) +
  geom_boxplot() +
  scale_fill_brewer(palette = "Pastel2")

pg_plot +
  theme(legend.position = "top")