R语言ggplot问题：虚线与实线分配错误（图例与图形不一致）

核心问题分析 #

1. 中位数连接线意外参与了线型映射，导致图例与图形线型不匹配
2. 颜色与线型图例的交叉映射引发了异常蓝色块
3. 未明确设置回归线的粗细（你要求粗实线，原代码未指定对应参数）

修正后的代码 #

ggplot(data = dd, aes(x=frequency, y=`velocity unipolar (m/s)`)) +
  # 箱线图：保留分组与颜色映射
  geom_boxplot(aes(group = map, color = loc_map))+ 
  # 中位数连接线：细实线，不参与线型图例映射（移出aes）
  stat_summary(fun=median, geom="line", aes(group=loc_map, color = loc_map), 
               linetype = "solid", size = 0.5)+
  stat_summary(fun=median, geom="point", aes(group=loc_map, color = loc_map))+
  # 回归线：粗实线，明确线型映射标识
  stat_poly_line(aes(group = loc_map, color = loc_map, linetype = "regression line"), 
                 size = 1.2)+ 
  # 4个估计值函数：统一绑定线型映射标识
  geom_function(fun = fun.LA.vel, aes(color = "LA", linetype = "estimate")) +
  geom_function(fun = fun.LV.vel, aes(color = "LV", linetype = "estimate")) +
  geom_function(fun = fun.RA.vel, aes(color = "RA", linetype = "estimate")) +
  geom_function(fun = fun.RV.vel, aes(color = "RV", linetype = "estimate"))+
  # 手动绑定线型与标签，彻底避免顺序错位
  scale_linetype_manual(
    name = "Line Type",
    values = c("regression line" = "solid", "estimate" = "dashed"),
    labels = c("Regression Line", "Estimate")
  )+
  # 明确颜色图例名称
  scale_color_discrete(name = "Mapping Location:")+
  labs(x = "Heart rate (bpm)", y = "Velocity unipolar (m/s)")+
  # 可选：调整图例位置
  theme(legend.position = "right")

关键修正说明 #

• 中位数连接线：将linetype从aes中移出，直接设置为solid并指定size=0.5（细实线），让它不进入线型图例，避免干扰映射逻辑。
• 回归线：在aes中明确linetype="regression line"，同时设置size=1.2实现粗实线效果，确保与估计值的线型映射完全分离。
• 线型映射：使用命名向量定义values，直接绑定标签与线型，彻底解决顺序错位导致的线型反转问题。
• 异常蓝色块：通过分离颜色与线型的映射逻辑，避免两种图例元素交叉渲染，消除异常色块。

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