19 Visualización
Definimos un tema para facilitar la visualización de nuestros resultados.
tema_graf <-
theme_minimal() +
theme(text = element_text(family = "serif"),
panel.grid.minor = element_blank(),
strip.background = element_rect(fill = "#EBEBEB", colour = NA),
legend.position = "none", legend.box.background = element_rect(fill = "#EBEBEB", colour = NA))