R/RStudio中如何自动安装缺失的所需GitHub来源R包

核心判断逻辑用requireNamespace()完成本地包存在性校验，不会提前加载冗余包，只有检测到缺包时才触发安装流程，避免重复安装拖慢脚本运行速度。

针对ggsankey包的可直接运行代码 #

# 第一步：先检测安装工具remotes是否存在，不存在则从CRAN安装
if (!requireNamespace("remotes", quietly = TRUE)) {
  install.packages("remotes", repos = "https://cran.rstudio.com/")
}

# 第二步：检测目标包ggsankey是否存在，不存在则从GitHub安装
if (!requireNamespace("ggsankey", quietly = TRUE)) {
  remotes::install_github("davidsjoberg/ggsankey")
}

# 第三步：加载包
library(ggsankey)

通用复用模板 #

如果需要适配其他GitHub来源的R包，只需要修改配置项参数即可，逻辑完全通用：

# 配置项：按需修改
github_pkg_name <- "ggsankey" # 包加载时的正式名称
github_repo_path <- "davidsjoberg/ggsankey" # GitHub仓库路径，格式为 作者/仓库名

# 自动校验安装逻辑，无需修改
if (!requireNamespace("remotes", quietly = TRUE)) {
  install.packages("remotes", repos = "https://cran.rstudio.com/")
}
if (!requireNamespace(github_pkg_name, quietly = TRUE)) {
  remotes::install_github(github_repo_path)
}
library(github_pkg_name, character.only = TRUE)

注意事项 #

• 首次运行触发安装流程时，请确保网络可以正常访问对应资源站点，否则会安装失败
• 所有包安装完成后，后续运行脚本不会重复触发安装步骤，会直接加载包，和手动写library()的运行速度没有差异
• 如果需要安装指定版本、指定子目录的GitHub包，直接在remotes::install_github()的参数中补充对应配置即可，外层判断逻辑不需要调整
• quietly = TRUE参数会屏蔽包检测过程中的冗余提示，保持控制台输出干净

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