ggplot2中annotation_scale比例尺单位错误：设置英里无效求助

问题根源 #

annotation_scale（来自ggspatial包）的单位转换依赖投影坐标系（而非经纬度坐标系），如果你的地图数据是经纬度（EPSG:4326，角度单位），直接设置plot_unit="mi"无法正确计算实际距离，会导致数值错误、单位显示异常。

解决方案 #

1. 先将空间数据转换为投影坐标系

选择适合你地图区域的投影坐标系（单位为米，比如UTM分带、区域专属投影），转换后再添加比例尺：

# 加载必要包
library(ggplot2)
library(ggspatial)
library(sf)

# 假设你的空间数据为sf_data，转换为对应投影（示例为北美UTM 10N，EPSG:26910，根据你的区域替换）
sf_data_proj <- st_transform(sf_data, crs = 26910)

# 绘制投影后的地图
map <- ggplot() +
  geom_sf(data = sf_data_proj)

# 添加英里比例尺
map + annotation_scale(
  plot_unit = "mi",
  pad_x = unit(4, "cm"),
  width_hint = 0.4,
  unit_category = "imperial" # 明确指定英制单位，确保显示正确
)

2. 不转换原始数据，传入投影后的边界框

如果不想修改原始数据的CRS，可创建一个投影后的边界框传入data参数：

# 基于原始数据生成投影后的边界框
bbox_proj <- st_bbox(sf_data) %>%
  st_as_sfc() %>%
  st_transform(crs = 26910) # 替换为你需要的投影CRS

# 原始地图（经纬度）添加正确的英里比例尺
map + annotation_scale(
  data = bbox_proj,
  plot_unit = "mi",
  pad_x = unit(4, "cm"),
  width_hint = 0.4
)

3. 检查ggspatial版本

确保使用最新版ggspatial，旧版本可能存在参数解析bug：

update.packages("ggspatial")

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