在 R 中加载包的字符串列表的优雅方式

Question

您好，我编写了以下代码：

################# Loadin Require Libraries #################
required.packages <- c('caret','readxl')
for (pkg in required.packages){
  if(!require(pkg, character.only = T)){
    install.packages(pkg,
                     character.only = T,
                     dependencies = T)
    library(pkg, character.only = T)
  }else{
    library(pkg, character.only = T)
  }

}

代码应该在对等的计算机上运行，​​因此为了处理可能丢失的库，我认为我迭代抛出了一个字符串列表，如果是，则检查包是否已安装 -> 如果没有则加载 -> 安装和然后加载。但是，当一个包不可用时，R 仍然会发出警告消息： 警告信息：

在库中（包，lib.loc = lib.loc，character.only = TRUE， logical.return = TRUE, : es gibt kein Paket namens ‘readxl’

我的问题：有没有更好的方法在 R 中检查/安装一堆库？我应该关心警告吗？如果它不重要，是否有办法阻止打印此警告？

编辑：最终解决方案感谢@akrun提供的正确答案：

################# Loadin Require Libraries #################
lib <- .libPaths()[1]
required.packages <- c('caret','readxl')
i1 <- !(required.packages %in% row.names(installed.packages()))
if(any(i1)) {
  install.packages(required.packages[i1], dependencies = TRUE, lib = lib) 
}
lapply(required.packages, require, character.only = TRUE)

2021 年更新 - 吃豆人

我发现 pacman - 包对这个目的非常有用，尤其是 p_load function。它会检查包是否已安装，否则会尝试安装丢失的包。

这个函数是库和需求的包装器。它检查以查看 如果安装了一个包，如果没有，它会尝试安装这个包 来自 CRAN 和/或 pacman 存储库列表中的任何其他存储库。

所以现在我用以下几行开始我所有需要“便携”的脚本：

require(pacman)  
# Load / Install Required Packages
p_load(dplyr, tidyr, gridExtra, psych)

在这种情况下加载/安装dplyr、tidyr、gridExtra & psych

这个包也不错（如果要清理环境的话）p_unload

# Unload All packages
p_unload()

Answer 1

这是一种选择

Pkgs <- c('caret','readxl')
lib <- .libPaths()[1]

i1 <- !(Pkgs %in% row.names(installed.packages()))
if(any(i1)) {
  install.packages(Pkgs[i1], dependencies = TRUE, lib = lib) 
  }