如何在ggplot2（R）中的误差条中定义宽度？

Question

我有以下数据，我试图绘制。我正在尝试更改错误栏的宽度，但我遇到了一个错误，说Width not defined. Set with position_dodge(width = ?)。我试过做position_dodge ..但它没有帮助。有什么建议？

library(ggplot2)

time <- c("t1","t1","t1","t1","t1","t1","t2","t2","t2","t2","t2","t2")
species <- c(1,1,1,2,2,2,1,1,1,2,2,2)
value <- c(1,2,3,11,12,13,4,5,6,11,12,13)

df <- data.frame(time, species,value)
df$time <- as.factor(df$time)
df$species <- as.factor(df$species)

ggplot(df,aes(x=time, y=value, color = species, group = species)) + # Change fill to color
  theme_bw() + 
  geom_point() + 
  stat_summary(fun.y=mean, position = "dodge") + 
  stat_summary(
    geom="errorbar", 
    fun.data= mean_cl_boot, 
    width = 0.1, size = 0.2, col = "grey57") + 
  # Lines by species using grouping
  stat_summary(aes(group = species), geom = "line", fun.y = mean) +
  ylab("Fitness")

Answer 1

位置躲闪用于显示数据点重叠时的所有数据点，我不确定这是否在您的示例中有任何用处，您可能会发现只删除此参数可以解决问题，如果您的数据不重叠。保持不变可以解决问题：

pd<-position_dodge(0.5)
  ggplot(df,aes(x=time, y=value, color = species, group = species)) + # Change fill to color
  theme_bw() + 
  geom_point(position = pd) + 
  stat_summary(fun.y=mean, position = pd) + 
  stat_summary(
    geom="errorbar", 
    fun.data= mean_cl_boot, 
    width = 0.1, size = 0.2, col = "grey57",
    position = pd) + 
  # Lines by species using grouping
  stat_summary(aes(group = species), geom = "line", fun.y = mean, position = pd) +
  ylab("Fitness")

只是编辑，以防止一切分裂。