Como adicionar barras (bars) em um mapa ggplot2 (geom_polygon) no R 3.5?