如何在R-barplot2（）“gplots”中的堆积条形图上插入误差线

Question

我想在r中创建一个带有单向误差条（以避免重叠）的堆叠条形图。但是，当我使用 gplots 的barplot2函数并省略besides=T时，会禁止自动显示错误栏。

这是一个表示我的数据的虚拟数据集：

BM=data.frame(Treatment=gl(3,4,24,labels=c("T1","T2","T3")),
Loc=gl(2,12,24,labels=letters[1:2]),Ind=gl(4,1,24,labels=c(1,2,3,4)),
Weight=runif(24))

我使用了以下代码：

mean.BM=tapply(Weight,list(Loc,Treatment),mean)
sd.BM=tapply(Weight,list(Loc,Treatment),sd)

bplot1=barplot2(mean.BM,panel.first=T,plot.ci=T,  
            ci.u=mean.BM+(0.5*sd.BM), col=c("grey30","grey80"))

不幸的是我还没有发布任何图片，我希望这个问题无论如何都是明确的！

我知道使用 ggplot2 可能有更优雅的方法，但由于我不熟悉这个软件包，我更喜欢使用 gplots 的解决方案。 如果这是不可能的，我当然感谢任何其他建议！