如何在R语言中直接从GitHub仓库导入并读取shapefile文件？

方法1：将Shapefile打包为Zip上传（推荐） #

Shapefile依赖.shp/.shx/.dbf/.prj等多个配套文件，打包成Zip后可直接通过GitHub Raw链接读取，无需手动下载单个文件。推荐使用sf包（当前主流空间数据处理工具，已替代rgdal）的st_read实现：

library(sf)
# 替换为你的GitHub Raw Zip文件链接
zip_url <- "https://raw.githubusercontent.com/wesleysc352/你的仓库名/main/seg_s3_r3_m10_fix_estat_amost_val.zip"
shape_data <- st_read(zip_url)

方法2：手动下载所有配套文件到临时目录 #

如果不想打包Zip，可将Shapefile的所有必备文件下载到本地临时目录后再读取：

library(rgdal)
library(httr)

# 配置文件前缀和GitHub Raw路径
file_base <- "seg_s3_r3_m10_fix_estat_amost_val"
raw_root <- "https://raw.githubusercontent.com/wesleysc352/你的仓库名/main/"

# 下载所有必需文件到临时目录
required_exts <- c("shp", "shx", "dbf", "prj")
temp_dir <- tempdir()
for (ext in required_exts) {
  file_url <- paste0(raw_root, file_base, ".", ext)
  dest_path <- file.path(temp_dir, paste0(file_base, ".", ext))
  GET(file_url, write_disk(dest_path, overwrite = TRUE))
}

# 读取Shapefile
shapefile <- readOGR(dsn = temp_dir, layer = file_base)

失败原因说明 #

你之前的代码无法运行有两个核心问题：

1. 链接类型错误：使用的是GitHub网页链接，而非Raw文件链接。网页链接指向HTML页面，不是原始文件内容，无法被空间数据读取函数识别。
2. Shapefile的多文件依赖：Shapefile是一组关联文件的集合，仅指定.shp文件时，读取函数找不到配套的索引、属性表和投影文件，导致读取失败。

注意：rgdal包已被标记为弃用，官方推荐使用sf包进行空间数据处理，后者API更简洁，对远程文件的支持也更友好。

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