[R-br] Adicionar barras em um mapa (ggplot2)