ggplot2系数图优化：调整geom_pointrange线条与点样式

直接修改geom_pointrange()的参数，并添加颜色比例尺即可实现需求：

# 基于你的现有代码调整（替换成你的数据集和映射字段）
ggplot(your_dataset, aes(x = term, y = estimate, ymin = conf.low, ymax = conf.high, fill = significance)) +
  # 实现两处调整的核心参数设置
  geom_pointrange(
    color = "gray50",          # 误差线条固定为灰色
    size = 1.5,               # 放大点的尺寸（可根据视觉需求调整数值）
    aes(color = significance) # 点的颜色绑定significance字段
  ) +
  # 指定不同significance对应的点颜色
  scale_color_manual(values = c(
    "significant" = "black", 
    "non-significant" = "white"
  )) +
  # 保留你原有的主题、标签等设置
  theme_classic()

关键调整说明： #

• 线条设为灰色：通过color = "gray50"固定误差线条颜色，不干扰fill字段的分组填充逻辑。
• 点的放大与颜色控制：用size参数调整点的大小；通过aes(color = significance)绑定点颜色与分组字段，再用scale_color_manual手动指定黑白两种对应颜色。

如果你的significance字段是逻辑值（如TRUE/FALSE），只需把scale_color_manual的取值键对应修改：

scale_color_manual(values = c("TRUE" = "black", "FALSE" = "white"))

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