如何为ggplot2中无刻度的单一颜色图层添加图例？

核心问题分析 #

你遇到的报错根源在于：当已有一个连续填充（fill）尺度（比如渐变地图）时，若尝试给另一图层的同一美学（如fill）绑定离散变量，ggplot会强制复用已有尺度，导致连续/离散尺度冲突；或者误将点图层的颜色映射到fill，和主图层的fill尺度重复。

解决方案 #

根据图层类型（点/多边形），分两种情况处理：

情况1：添加点图层（如县中心点），用color美学区分 #

主图层用fill做渐变，点图层用color设置单一颜色，通过绑定虚拟分类变量生成图例，避免和fill尺度冲突：

library(ggplot2)
library(sf)

# 加载NC测试数据集
nc <- st_read(system.file("shape/nc.shp", package = "sf"))

ggplot() +
  # 渐变填充的县图层（连续fill尺度）
  geom_sf(data = nc, aes(fill = AREA)) +
  scale_fill_viridis_c(name = "县域面积") +
  # 添加县中心点，绑定color到虚拟变量
  geom_sf(data = nc, aes(color = "县中心点"), size = 2) +
  # 手动设置color尺度，指定颜色和图例
  scale_color_manual(
    values = c("县中心点" = "#0055aa"),
    guide = guide_legend(title = "县中心点")
  ) +
  theme_minimal()

情况2：添加多边形图层（如水域），需复用fill美学 #

如果必须用fill（比如多边形填充），需要用ggnewscale包创建独立的fill尺度，避免和主图层的渐变fill冲突：

library(ggplot2)
library(sf)
library(ggnewscale)

nc <- st_read(system.file("shape/nc.shp", package = "sf"))
# 模拟水域数据（取前5个县作为示例）
watercourses <- nc[1:5, ]

ggplot() +
  # 主图层：渐变填充的县
  geom_sf(data = nc, aes(fill = AREA)) +
  scale_fill_viridis_c(name = "县域面积") +
  # 启用新的fill尺度
  new_scale_fill() +
  # 水域图层，绑定fill到虚拟变量
  geom_sf(data = watercourses, aes(fill = "水域"), alpha = 0.5) +
  # 设置新的fill尺度，生成仅含色块和名称的图例
  scale_fill_manual(
    values = c("水域" = "#0055aa"),
    guide = guide_legend(title = "水域")
  ) +
  theme_minimal()

关键说明 #

• 绑定虚拟变量（如aes(color = "县中心点")）是让ggplot识别这是一个分类项，从而生成图例。
• 若要隐藏图例的“刻度”，因为只有一个分类值，默认图例就只会显示色块+名称，无需额外设置。
• ggnewscale的作用是为同一美学（如fill）创建多个独立尺度，解决重复尺度的冲突问题。

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