使用最小值和最大值的置信区间

Question

无论如何,使用ggplot2可以使用围绕geom_line图中平均值的最小值和最大值生成置信带或类似置信带的东西吗？

数据:

Year   Value   Group
50      0.25    Avg
100     0.30    Avg
200     0.27    Avg
250     0.26    Avg
500     0.22    Avg
1000    0.24    Avg
5000    0.27    Avg
10000   0.23    Avg
50      0.24    Max
100     0.29    Max
200     0.24    Max
250     0.23    Max
500     0.20    Max
1000    0.22    Max
5000    0.22    Max
10000   0.20    Max
50      0.28    Min
100     0.33    Min
200     0.31    Min
250     0.30    Min
500     0.27    Min
1000    0.26    Min
5000    0.32    Min
10000   0.33    Min

目前的情节如下:

但是希望最大和最小的线看起来像一个信心乐队!

如果需要,我也有用于生成上述内容的基础数据,任何提示或想法都会非常受欢迎.

Answer 1

require(reshape2)
dat_cast <- dcast(dat, Year~Group, value.var = "Value")

ggplot(dat_cast, aes(x=Year, y=Avg)) + 
  geom_ribbon(aes(ymin = Min, ymax = Max), alpha = 0.5) +
  geom_line(col = 2)