我怎么能一次加载一堆包,而不需要一遍又一遍地键入要求命令?我尝试了三种方法,都失败了。

基本上,我想为一个函数提供一个包名向量,该函数将加载它们。

x<-c("plyr", "psych", "tm")

require(x)
lapply(x, require)
do.call("require", x)

当前回答

我使用以下函数:

mrip <- function(..., install = TRUE){
    reqFun <- function(pack) {
        if(!suppressWarnings(suppressMessages(require(pack, character.only = TRUE)))) {
            message(paste0("unable to load package ", pack,
                           ": attempting to download & then load"))
            install.packages(pack)
            require(pack, character.only = TRUE)
        }
    }
    lapply(..., reqFun)
}

这将尝试加载,如果失败,则安装,然后尝试再次加载。

其他回答

我维护的CRAN包pacman(与Dason Kurkiewicz合著)可以实现这一点:

所以用户可以这样做:

## install.packages("pacman")
pacman::p_load(dplyr, psych, tm) 

如果包丢失,p_load将从CRAN或Bioconductor下载它。

我使用以下函数:

mrip <- function(..., install = TRUE){
    reqFun <- function(pack) {
        if(!suppressWarnings(suppressMessages(require(pack, character.only = TRUE)))) {
            message(paste0("unable to load package ", pack,
                           ": attempting to download & then load"))
            install.packages(pack)
            require(pack, character.only = TRUE)
        }
    }
    lapply(..., reqFun)
}

这将尝试加载,如果失败,则安装,然后尝试再次加载。

你所提议的函数的几种排列是可行的——但前提是你指定了字符。唯一的论点为真。简单的例子:

lapply(x, require, character.only = TRUE)

轻微修改Tyler Rinker的回答,增加安装和加载吃豆人的检查:

#Install/load pacman
if(!require(pacman)){install.packages("pacman");require(pacman)}
#Install/load tons of packages
p_load(plyr,psych,tm)

我喜欢p_load解决方案,因为它避免了引用!

您可以简单地使用lubripack包,它整齐地安装新包,然后在一行中加载所有这些包。

lubripack("plyr", "psych", "tm")

下面是在RStudio中运行上述代码后的输出。

软件包安装方法:

运行下面的代码下载包并从GitHub安装。不需要有GitHub帐户。

library(devtools)
install_github("espanta/lubripack")