如何从私有GitHub仓库加载RDA对象至R环境？

方法一：通过GitHub API直接加载（无需克隆仓库） #

适合临时加载单个文件的场景：

• 先安装并加载gh包，用于调用GitHub API
• 生成GitHub个人访问令牌（PAT），需勾选repo权限（用于访问私有仓库）
• 执行以下代码（替换占位符为你的实际信息）：

# 安装依赖包（首次运行）
install.packages(c("gh", "base64enc"))
library(gh)
library(base64enc)

# 设置PAT（建议用环境变量，避免硬编码）
Sys.setenv(GITHUB_PAT = "你的GitHub_PAT")

# 获取RDA文件的Base64编码内容
rda_response <- gh(
  endpoint = "/repos/{owner}/{repo}/contents/{path}",
  owner = "你的GitHub用户名",
  repo = "私有仓库名称",
  path = "文件在仓库中的相对路径（如data/obj.rda）",
  ref = "目标分支（如main）"
)

# 解码并加载到R环境
raw_data <- base64decode(rda_response$content)
con <- rawConnection(raw_data)
load(con)
close(con)

方法二：克隆仓库到本地后加载 #

适合需要频繁访问仓库中多个文件的场景：

• 用Git命令克隆私有仓库（将PAT嵌入URL实现认证）
• 加载本地的RDA文件：

# 克隆私有仓库（替换占位符）
system("git clone https://你的GitHub用户名:你的PAT@github.com/你的GitHub用户名/私有仓库名.git")

# 加载RDA文件（替换为本地路径）
load("私有仓库名/文件相对路径.rda")

注意事项 #

• 不要在脚本中硬编码PAT，推荐用keyring包存储管理，或通过系统环境变量读取
• 确保PAT拥有访问目标私有仓库的权限（个人仓库选repo权限，组织仓库需额外确认组织权限）
• 如果仓库是SSH认证方式，可替换克隆命令为SSH格式：git clone git@github.com:用户名/仓库名.git（需配置SSH密钥）

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