7.2 Barras

Utilizaremos el summary que creamos con las unidades de salud por tipo de servicio, para construir una gráfica de barras La función scale_fill_stata() nos permite usar la paleta de colores stata.

 ggplot(hospitales_by_mun_serv, aes(x = state, fill = establishment_type)) +
  geom_bar() +
  labs(x = "Estado", y = "Total de unidades", title = "Unidades de salud por tipo de servicio") +
  scale_fill_stata(name = "") +
  theme_clean()  + 
  theme(axis.text.x=element_text(angle = 90, hjust = 1, vjust = 0.5),
        legend.position = "bottom", legend.direction = "horizontal") 

Para crear una gráfica independiente para cada uno de los estados, podemos utilizar la función facet_wrap()

 ggplot(hospitales_by_mun_serv, aes(x = establishment_type, fill = establishment_type)) +
    geom_bar() +
    labs(x = "Estado", y = "Total de unidades", title = "Unidades de salud por tipo de servicio") +
    scale_fill_stata(name = "") +
    theme_clean(base_size = 18) + 
    theme(axis.text.x=element_text(angle = 90, hjust = 1, vjust = 0.5),
          legend.position = "bottom", legend.direction = "horizontal") +
    facet_wrap(~state)