如何为ggplot中指定的geom_point添加手动误差棒？

问题背景 #

在ggplot中成功添加了数据集外的特定数据点，但为这些点添加误差棒时提示美学映射不匹配，新增的geom_point正常显示，但geom_errorbar无法生效。原代码逐个添加dat1到dat8的数据点，仅尝试为dat1添加误差棒，未处理图层继承美学映射的问题。

原核心代码：

dat1 <- data.frame(x = "-/-", y = 2837.3333, Well = "0", errors = 334.02993877795)
# 其余dat2到dat8定义...

ggplot(well_data4, aes(x = E2F4, y = Colonies, color = Clone, fill = E2F4)) +
 geom_point(aes(color = Clone), size = 2) +
 geom_point(data = dat1, aes(x=x, y=y), color = "black", inherit.aes = FALSE, size = 2)+
 geom_errorbar(data = dat1, mapping = aes(x = x, ymin = y - errors, ymax = y + errors), width  = 0.2, color = "black")+
# 其余dat2到dat8的geom_point...

报错原因：geom_errorbar未设置inherit.aes = FALSE，会自动继承主图的aes（包括color = Clone），但dat1等数据集不含Clone列，导致美学映射不匹配。

解决方案 #

• 合并新增数据集：将分散的dat1到dat8合并为一个数据集，大幅简化代码：

  summary_dat <- rbind(dat1, dat2, dat3, dat4, dat5, dat6, dat7, dat8)
  

• 修正ggplot图层代码：为geom_errorbar添加inherit.aes = FALSE，避免继承主图不匹配的美学映射，同时用合并后的数据集一次性添加所有点和误差棒：

  ggplot(well_data4, aes(x = E2F4, y = Colonies, color = Clone, fill = E2F4)) +
    geom_point(aes(color = Clone), size = 2) +
    # 一次性添加所有额外数据点
    geom_point(data = summary_dat, aes(x = x, y = y), color = "black", inherit.aes = FALSE, size = 2) +
    # 添加误差棒，禁用继承主图美学映射
    geom_errorbar(
      data = summary_dat,
      aes(x = x, ymin = y - errors, ymax = y + errors),
      width = 0.2,
      color = "black",
      inherit.aes = FALSE
    )
  

关键说明 #

• inherit.aes = FALSE：强制该图层仅使用自身定义的美学映射，彻底避免因主图与子数据集列不匹配导致的报错。
• 合并数据集：减少重复代码，后续修改点样式、误差棒参数等只需调整一处，便于维护。

内容的提问来源于stack exchange，提问作者astaf