使用ggplot2+tidyterra时，能否为离散等高线配置连续图例？

要实现保留5米间隔等高线、同时使用50米间隔图例的需求，核心思路是分离绘制用的等高线间隔和图例显示的刻度间隔，具体步骤如下：

1. 准备数据与计算间隔 #

先加载所需包，并根据你的水深栅格数据计算两种间隔的breaks：

library(ggplot2)
library(tidyterra)

# 假设你的水深栅格对象名为depth_rast
# 计算数据范围，生成5米间隔的breaks（用于绘制等高线）
depth_range <- range(values(depth_rast), na.rm = TRUE)
breaks_5m <- seq(floor(depth_range[1]/5)*5, ceiling(depth_range[2]/5)*5, by = 5)

# 生成50米间隔的breaks（用于图例显示）
breaks_50m <- seq(floor(depth_range[1]/50)*50, ceiling(depth_range[2]/50)*50, by = 50)

2. 绘制并配置图例 #

在绘图时，让geom_spatraster_contour_filled使用5米间隔的breaks，同时在颜色刻度中指定图例仅显示50米间隔的刻度：

ggplot() +
  # 用5米间隔绘制填充等高线
  geom_spatraster_contour_filled(data = depth_rast, breaks = breaks_5m) +
  # 配置颜色映射与图例
  scale_fill_viridis_d(
    breaks = breaks_50m,
    guide = guide_colorsteps(
      even.steps = FALSE,  # 禁用自动均分，保留手动指定的50米间隔
      show.limits = TRUE,  # 显示数据的最小/最大值
      title = "水深 (m)",
      barwidth = 12,       # 可根据需要调整图例宽度
      barheight = 1        # 可根据需要调整图例高度
    )
  ) +
  theme_minimal()

关键说明 #

• geom_spatraster_contour_filled的breaks参数控制实际绘制的等高线间隔，确保所有5米的层级都被渲染。
• scale_fill_viridis_d中的breaks参数指定图例仅显示50米间隔的刻度，减少图例项数量。
• guide_colorsteps(even.steps = FALSE)是核心：如果不设置这个参数，ggplot会强制将图例刻度均分，忽略你手动指定的50米间隔。
• 如果你的颜色方案需要连续渐变效果，可以替换为scale_fill_steps或对应的渐变函数（如scale_fill_gradientn），只要保持breaks参数为50米间隔即可。

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