r - geom_ribbon 中的渐变

Question

我有以下ggplot2绘制从第三个四分位数到第 97 个四分位数的功能区的代码:

h <- ggplot(l, aes(x=age[limit]))
h <- h + geom_ribbon(aes(ymin=X3rd[limit], ymax=X97th[limit]), fill="gray80") 
h

geom_ribbon help page表明梯度、梯度2等是该几何图形填充的“相关比例”。我想要的是让丝带在外面呈浅灰色，在中间变成深灰色，然后在外面再次变成浅灰色，但我得到的印象是渐变不能(并且一些谷歌结果强化了这种印象)实际上应用于功能区。

Answer 1

geom_ribbon不支持渐变。相反，如果我正确理解你想要做什么，那么重叠的丝带可能会很有用:

d <- data.frame(x=1:10, m=runif(10))
d <- transform(d, l1=m-1, l2=m-2, u1=m+1, u2=m+2)

ggplot(d, aes(x)) + 
  geom_ribbon(aes(ymin=l2, ymax=u2), fill="grey60") + 
  geom_ribbon(aes(ymin=l1, ymax=u1), fill="grey40")