带有误差线的R条形图

Question

我对R相对较新，一直试图找出如何在条形图中添加误差线。举一个简单的例子，我有两年的细菌流行数据，我希望增加误差条。首先，我创建一个数据框，其中包含x和y值以及95％置信区间的标准误差：

>df<-data.frame(Year=factor(c(2011,2012)),MS_Prevalence=c(16.02,7.08),se=c(.20750,.10325))

然后我设置了误差线的上限和下限：

>limits<-aes(ymax=MS_Prevalence+se,ymin=MS_Prevalence-se)

接下来，我将图表设置为p：

>p<-ggplot(df,aes(y=MS_Prevalence,x=Year))

现在我将添加条形图：

>p+geom_bar(position="dodge",stat="identity")

我选择了酒吧的宽度：

>dodge<-position_dodge(width=0.9)

然后，尝试添加错误栏：

>p+geom_bar(position=dodge)+geom_errorbar(limits,position=dodge,width=0.25)

当我添加错误条时，我的图形从一个条形变为另一条形。虽然它确实包含错误栏，但我需要一个条形图来恰当地表示我的数据。任何帮助将不胜感激！

Answer 1

尝试：

ggplot(df) + 
geom_bar(aes(x=Year, y=MS_Prevalence), stat='identity', color=gray)+
geom_errorbar(aes(x=Year, ymin=(MS_Prevalence-se),ymax=(MS_Prevalence+se)),
   width=0.25)