如何对齐两个ggplot中geom_contour_filled的颜色刻度

问题核心：虽然给两个图设置了相同的breaks参数，但geom_contour_filled会自动过滤掉当前数据中未覆盖的区间，仅保留实际存在的区间生成图例，导致两个图的颜色刻度无法对齐。要在不合并数据框的前提下实现对齐，需手动强制统一填充色的映射范围。

解决方案代码 #

library(ggplot2)

df_1 <- df_2 <- data.frame(
    n = rep(seq(0.1, 1, 0.1), each = 10),
    r = rep(seq(0.1, 1, 0.1), 10)
)

df_1$value <- df_1$n + df_1$r
df_2$value <- df_2$n + df_2$r + 0.2

# 定义统一的breaks规则
breaks <- seq(0, 2, length.out = 21)
# 生成与geom_contour_filled自动生成格式一致的区间标签
contour_labels <- cut(breaks, breaks = breaks, include.lowest = TRUE, right = TRUE)[-1]

p1 <- ggplot(df_1, aes(x = n, y = r, z = value)) +
    geom_contour_filled(breaks = breaks) +
    scale_fill_discrete(limits = contour_labels) +  # 强制使用完整区间作为图例范围
    theme(legend.position = "bottom")

p2 <- ggplot(df_2, aes(x = n, y = r, z = value)) +
    geom_contour_filled(breaks = breaks) +
    scale_fill_discrete(limits = contour_labels) +  # 与p1保持完全一致的图例范围
    theme(legend.position = "bottom")

p1 + p2

关键说明 #

• contour_labels生成的标签格式和geom_contour_filled自动生成的完全匹配，确保映射对应准确
• scale_fill_discrete(limits = contour_labels)强制两个图的图例都包含所有breaks定义的区间，即使某个数据未覆盖该区间，图例项仍会保留，颜色会严格对应相同的区间范围
• 如果使用自定义配色（如viridis），只需将scale_fill_discrete替换为对应离散配色函数（如scale_fill_viridis_d），并保留limits参数即可。

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