带有错误栏，颜色和图例名称的条形图

Question

我有一个变量X和Y变量。我正在努力使用ggplot生成带有误差条，不同颜色和因子名称的图形，但有些卡住了。我需要让Lambing从1,2,3出现，例如1 = Inside。还希望包含误差条和条形以具有3种不同的不同颜色。

这是我的代码和数据样本。

atob("SGV5IE5pbGVzaCEgSSBob3BlIHlvdSB3aWxsIGdldCBpdCB0byB3b3JrIHNvb24h".replace(/\-/g, '+').replace(/\_/g, '/'));

以下是数据样本：

ggplot(na.omit(orf), aes(x = factor(Lambing), 
  y = Cases2012,fill=Lambing)) +
  geom_bar(stat = "identity", position="dodge", width=.6,)+ 
 xlab("Lambing") + ylab("Number of cases") +  
ggtitle("Orf cases in relation to lambing")

Answer 1

这里有一些问题/问题。

• 你确定Y值是你想要的（即stat="identity"是否真的正确）？如果您将alpha=0.2添加到geom_bar，您会看到所有不同的值都在同一个X位置过度绘制。您是否愿意计算某个类别中值的平均值或总和，例如stat_summary(fun.y="mean", geom="bar")（躲避似乎并没有在这里做任何事情）？
• 您想如何计算误差范围？下面我使用了bootstrap CIs
• 条形码似乎多余（但我可能误解了您的要求：重读它，我认为factor(Lambing)做你想要的......如果是这种情况，只需删除/注释掉{{1}下面的图层）

修改：

• 更改图例/ x轴标签的最简单方法是更改​​因子的级别，即geom_text()（请注意这一点 - 由您决定是否按正确的顺序进行！）< / LI>
• 调整错误栏计算的最简单方法是使用levels(orf$Lambing) <- c("inside","partly","outside")的替代方法之一：这些方法最好通过?mean_cl_boot进行记录。 help("smean.cl.boot",package="Hmisc")包提供包装，例如ggplot2（smean.cl.boot） - ＆gt; Hmisc（mean_cl_boot），例如：
  • ggplot2：CI假设正常（即基于标准错误/学生t）
  • mean_cl_normal：非参数基于引导程序的CI
  • mean_cl_boot：中位数和分位数

median_hilow