Estou usando o ggplot2 para melhorar os gráficos de barras de precipitação. Aqui está um exemplo reproduzível do que desejo alcançar: library(ggplot2) library(gridExtra) secu <- seq(1, 16, by=2) melt.d <- data.frame(y=secu, x=LETTERS[1:8]) m <- ggplot(melt.d, aes(x=x, y=y)) +...