在ggplot2&R中着色geom_ribbon

Question

我有以下代码行,它们将两个geom_ribbons绘制到同一个画布上,以创建一个看起来像geom_area的图,但是一个功能区代表数据(如geom_area那样),另一个代表100个数据,这样数据+(100 - data)= 100.代码是:

customBars3 <- ggplot(barsFrame, aes(x=as.numeric(as.character(rAge)), y=PositivePercent)) + geom_ribbon(aes(ymax=100, ymin=PositivePercent, fill = "red")) + geom_ribbon(aes(ymax=PositivePercent, ymin=0, fill = "green")) + facet_wrap(~ Divergence)

我得到一个如下图形:

但是,我希望下部色带实际上是绿色,而上部色带实际上是红色.我该怎么做并相应地更改图例？我指定填充颜色的努力导致图例用所述颜色标记但用不同颜色填充.

谢谢,本.

Answer 1

您可以使用scale_fill_manual()更改填充颜色.第一个参数是您的数据级别,第二个参数是实际颜色.

  +scale_fill_manual(values=c("green"="green","red"="red"))