如何在R中叠加多个ggplot图层绘制shapefile地图？

你不能直接合并独立的ggplot对象，因为每个ggplot()调用都会生成一个全新的绘图实例，它们之间无法直接叠加。正确的做法是基于同一个ggplot画布，依次添加不同的sf图层：

核心代码示例 #

# 从空画布开始，依次叠加所有图层
ggplot() +
  geom_sf(data = scotland) +          # 底图：苏格兰区域边界
  geom_sf(data = farmscot,            # 叠加农场图层
          fill = "olivedrab",         # 设置填充色
          alpha = 0.6) +              # 调整透明度避免遮挡底图
  geom_sf(data = river,               # 叠加河流图层
          color = "steelblue",        # 设置线条颜色
          linewidth = 0.8)            # 调整线宽

关键注意事项 #

• 图层顺序决定层级：先添加的图层在底层，后添加的在上层。一般把大面积的底图（比如行政边界）放在最前面，再叠加面状要素（农场），最后加线状/点状要素（河流）。
• 样式区分要素：通过fill（面填充）、color（线条/点颜色）、alpha（透明度）、linewidth（线宽）等参数，让不同图层的要素清晰区分。
• CRS一致性：如果你的三个sf对象坐标系（CRS）不一致，需要先统一坐标系，比如：

  # 将farmscot和river转成和scotland一样的CRS
  farmscot <- st_transform(farmscot, crs = st_crs(scotland))
  river <- st_transform(river, crs = st_crs(scotland))
  

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