ggplot2堆积面积图上的误差线

Question

我想在使用ggplot2 创建的堆积面积图上添加误差线。

我的 csv 文件看起来像：

Day  Cat  Val   Error  
0    A    0     0.00  
0    B   44.77  1.16  
0    C   54.64  0.88  
13   A   1.34   0.32  
13   B   22.78  0.45  
13   C   38.33  2.12  
19   A   1.95   0.35  
19   B   24.00  2.25  
19   C   40.30  3.86

我试过了：

ggplot(data=mydata, aes(x=Day,y=Val, group=Cat, fill=Cat,colour=Cat, ymax=Val + Error,   ymin= Val - Error)) +
 geom_area() +
 geom_errorbar(width=.5, color="black")

我有这个：

我对图表的面积图部分很满意，但误差线没有堆叠在数据点上。

我刚刚开始使用R，我真的不知道问题出在哪里。

此外，我发现这个tip 使用geom_segment 来避免条形之间的重叠，但我未能将它与此代码一起使用。

谢谢你帮助我！

Answer 1

您正在堆叠您的数据，而不是您的错误栏。要计算误差条的ymin 和ymax 的堆叠版本，您可以使用plyr 包的ddply 函数。

library(plyr) 
mydata2 <- ddply(mydata,.(Day),transform,ybegin = cumsum(Val) - Error,yend = cumsum(Val) + Error)   

ggplot(data=mydata2, aes(x=Day,y=Val, fill=Cat)) +
     geom_area() +
     geom_errorbar(aes(ymax=ybegin , ymin= yend ),width=.5, color="black") 

输出：