使用ggplot绘制同色线条与散点时，如何实现图例分开标注？

要实现同一维度（dim）的线条和散点颜色一致，但图例分开标注，有两种可靠的实现方式：

方法一：使用ggnewscale包创建独立颜色比例尺 #

这个方法最直观，通过添加新的颜色比例尺，让线条和散点各自生成独立图例，且颜色映射完全一致。

步骤： #

1. 安装并加载ggnewscale包（首次使用时运行安装命令）
2. 定义统一的颜色映射向量，确保两个图层使用相同颜色
3. 分别绘制线条和散点图层，为每个图层设置独立的颜色比例尺和图例名称

# 首次使用时安装包
install.packages("ggnewscale")

library(ggplot2)
library(ggnewscale)

# 定义统一的颜色映射（可按需修改颜色值）
color_map <- c("dim1" = "#1f77b4", "dim2" = "#ff7f0e")

# 绘制图形
ggplot() +
  # 线条图层：第一个颜色比例尺，图例名称为"线条"
  geom_line(data = data_posterior, aes(x = x, y = mean, color = dim)) +
  scale_color_manual(name = "线条", values = color_map) +
  
  # 添加新的颜色比例尺，分隔线条和散点的图例
  new_scale_color() +
  
  # 散点图层：第二个颜色比例尺，图例名称为"散点"，使用同一颜色映射
  geom_point(data = data_observed, aes(x = x, y = y, color = dim)) +
  scale_color_manual(name = "散点", values = color_map)

方法二：不依赖额外包，结合颜色与形状美学 #

如果不想安装新包，可以通过将线条映射到color，散点映射到shape，再手动同步颜色，实现分开图例。

library(ggplot2)

# 定义统一的颜色映射
color_map <- c("dim1" = "#1f77b4", "dim2" = "#ff7f0e")

ggplot() +
  # 线条图层：映射color=dim
  geom_line(data = data_posterior, aes(x = x, y = mean, color = dim)) +
  # 散点图层：映射shape=dim，调整点大小提升辨识度
  geom_point(data = data_observed, aes(x = x, y = y, shape = dim), size = 3) +
  
  # 设置线条颜色
  scale_color_manual(values = color_map) +
  # 设置散点形状
  scale_shape_manual(values = c(16, 17)) +
  
  # 调整图例：给散点图例同步线条颜色，并重命名两个图例
  guides(
    color = guide_legend(name = "线条"),
    shape = guide_legend(
      name = "散点",
      override.aes = list(color = color_map) # 让散点图例的颜色与线条一致
    )
  )

原理说明 #

• 方法一通过new_scale_color()创建独立的颜色比例尺，让线条和散点的颜色映射互不干扰，从而生成两个独立图例，且颜色完全匹配。
• 方法二利用不同的美学属性（color和shape）分别映射维度，再通过override.aes手动同步散点图例的颜色，实现视觉上的颜色统一和图例分离。

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