如何在ggplot图例中分别独立调整线条与点形状的大小

问题原因 #

你现有代码的问题在于guides()的参数设置逻辑错误：将colour图例的linetype设为0直接隐藏了线条，且没有按图层、按美学映射分别设置图例覆盖参数，才会出现线条过粗遮挡点、点线交叠识别度差的问题。

核心逻辑 #

ggplot的图例和美学映射是一一绑定的，只要在guides()中给不同美学映射单独传入override.aes，就能实现点、线尺寸的独立控制：

• 针对拟合线对应的linetype、colour映射：单独设置图例内的线条粗细，调小size参数保证虚线、实线线型清晰可辨
• 针对散点对应的shape、colour映射：单独设置图例内的点尺寸，同时将点对应的linetype设为0，避免点位置冗余绘制线条造成交叠

修正代码 #

直接替换原代码末尾的guides()部分即可，完整可运行代码如下：

ggplot(df, aes(x = Psych.Distress.Sum, y = Likelihood.Max, color = Feedback)) +
  geom_smooth(method = "lm", se = T, aes(linetype = Feedback)) +
  geom_jitter(aes(shape = Feedback)) +
  labs(x = "Psychological Distress", y = "Endorsement of Max's Feedback Strategy") +
  apatheme +
  theme(axis.title = element_text(face="bold")) +
  theme(legend.text = element_text(face="bold")) +
  theme(legend.position = c(0.87, 0.13)) +
  scale_color_grey(end = .5) +
  theme(legend.key.height= unit(.5, 'cm'),
        legend.key.width= unit(1, 'cm')) +
  # 分别为不同美学映射设置图例参数
  guides(
    linetype = guide_legend(override.aes = list(size = 0.8)),
    shape = guide_legend(override.aes = list(size = 3, linetype = 0)),
    colour = guide_legend(override.aes = list(size = 3, linetype = 0))
  )

参数调优提示 #

• 线条的size参数可根据实际显示效果微调，0.5-1区间的数值既能清晰区分虚线、实线，也不会因为线条过粗遮挡点标识
• 点的size=3保留了你原本设置的醒目尺寸，搭配linetype=0可彻底解决点线交叠问题
• 由于colour、linetype、shape三个美学都映射给同一个变量Feedback，设置完成后ggplot会自动合并三个图例为单个，不会出现重复图例项

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