如何在ggplot图例中添加自定义的真实值虚线标识

要在不修改原数据集x轴分类的前提下给黑色虚线添加图例，核心思路是给真实值线段单独指定美学映射，通过虚拟分组触发图例生成，再手动定义图例样式。

修改后可运行的完整代码 #

group = c("group1", "group2", "group3", "group4", "group5")
treatment = c("treatment1", "treatment2")
estimates = c("estim1", "estim2")
parameters = c("param1", "param2")
means = c(0, 0, 5, 0, -5, 0, 0, 7, -5, 10, -5, 0, 0, 0, 0, 0, -5, 0, 0, 10)
UL = c(.5, .5, 5.5, .5, -4.5, 0.5, 0.5, 7.5, -4.5, 10.5, -4.5, .5, .5, .5, .5, .5, -4.5, .5, .5, 10.5)
LL = c(-.5, -.5, 4.5, -.5, -5.5, -.5, -.5, 6.5, -4.5, 9.5, -4.5, -.5, -.5, -.5, -.5, -.5, -4.5, -.5, -.5, 9.5)
values = c(.2, -.2, 5.2, -.3, -4.7, -.1, -.2, 6.9, -5.3, 10.1, -4.4, 0.1, 0.2, 0.3, 0.1, -0.1, -4.9, -.2, -.2, 9.9)

df = data.frame(
  group = rep(rep(group, each = 2), 2),
  treatment = rep(treatment, each = 10),
  estimates = rep(estimates, 10),
  LL = LL,
  means = means,
  UL = UL,
  parameters = rep(parameters, 10),
  values = values
)

library(ggplot2)

ggplot(data = df, aes(x = as.factor(estimates), y = means, color = estimates))+
  geom_point()+
  geom_errorbar(aes(ymin = LL, ymax = UL), width=.1, position = position_dodge(0.1))+
  # 关键：给线段添加linetype的虚拟分组映射
  geom_segment(aes(x = rep(c(.6, 1.6), 10), xend = rep(c(1.4, 2.4), 10), 
                   y = values, yend = values, linetype = "True Value"), 
               col = "black")+
  scale_x_discrete(labels = c(expression(beta[1]), expression(beta[2])))+
  xlab("Beta coefficient type")+ylab("Confidence Interval of Estimate")+ 
  ggtitle("Coefficient Estimates")+ 
  facet_grid(row = vars(treatment), col = vars(group))+
  scale_color_manual(name = "Symbols",
                     values = c("estim1" = "#F8766D", "estim2" = "#00BFC4"),
                     labels = c(expression(beta[1]), expression(beta[2])))+
  # 定义真实值虚线的图例样式
  scale_linetype_manual(name = "",
                        values = c("True Value" = 3),
                        labels = "真实值")+
  # 可选：优化图例布局
  theme(legend.position = "bottom",
        legend.box = "horizontal")

关键修改说明 #

• 虚拟分组触发图例：不再直接设置linetype=3，而是通过aes(linetype = "True Value")给线段绑定一个虚拟分组，让ggplot自动生成图例项。
• 自定义图例样式：用scale_linetype_manual指定该虚拟分组对应线型为虚线（3），并设置图例标签为“真实值”。
• 不改动原数据集：无需给estimates列新增水平，完全保留原有x轴刻度，不会出现空刻度问题。
• 可选布局优化：通过theme调整图例位置，让系数类型和真实值的图例横向排列，更美观。

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