ggplot双图例（颜色+线型）绘制异常问题求助

问题说明 #

• 需为df1设置红色（#f8766d）、df2设置蓝色（#619cff）、df3设置绿色（#00ba38），同时生成对应颜色图例
• 根据z1/z2/z3向量为线条设置线型：m对应实线、n对应点线、p对应虚线，生成线型图例
• 当前代码运行后y1与y3颜色互换，使用scale_color_identity()可修正颜色但会丢失颜色图例，需解决该问题

数据集代码 #

x <- 1:10

y1 <- x
y2 <- x^2
y3 <- x + 1

z1 <- c("m", "m", "m", "m", "m", "m", "m", "n", "n", "n")
z2 <- c("n", "n", "n", "n", "n", "n", "p", "p", "p", "p")
z3 <- c("m", "m", "m", "m", "m", "n", "n", "n", "p", "p")

df1 <- data.frame(x, y1, z1)
df2 <- data.frame(x, y2, z2)
df3 <- data.frame(x, y3, z3)

解决方案 #

核心思路是将颜色映射到系列名称而非直接写颜色码，让ggplot正确识别分类变量，既保证颜色对应正确，又能保留图例。

修正后的完整代码 #

library(ggplot2)

ggplot() +
  # 每个geom_line的color映射为系列名称，而非直接颜色值
  geom_line(data = df1, aes(x, y1, linetype = z1, color = "y1"), size = 1) +
  geom_line(data = df2, aes(x, y2, linetype = z2, color = "y2"), size = 1) +
  geom_line(data = df3, aes(x, y3, linetype = z3, color = "y3"), size = 1) +
  # 线型手动映射，明确对应关系
  scale_linetype_manual(
    values = c("m" = "solid", "n" = "dotted", "p" = "dashed"),
    name = "线型图例"
  ) +
  # 颜色手动映射，用命名向量明确系列与颜色的对应，避免顺序错乱
  scale_color_manual(
    values = c("y1" = "#f8766d", "y2" = "#619cff", "y3" = "#00ba38"),
    name = "颜色图例"
  ) +
  xlim(0, 10) +
  ylim(0, 10)

关键改动说明 #

1. 颜色映射调整：把aes(color = "#f8766d")这类直接写颜色码的方式，改为aes(color = "y1")，用系列名称作为分类变量，让ggplot能识别并生成图例
2. 颜色映射明确化：scale_color_manual使用命名向量指定颜色，确保y1对应红色、y2对应蓝色、y3对应绿色，彻底解决颜色互换问题
3. 图例优化：通过name参数直接设置图例标题，无需额外labs，简化代码同时保证图例清晰

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