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

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

目前的情节如下：

但是希望max和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)