requireコマンドを何度も再入力せずに、一度にたくさんのパッケージをロードするにはどうすればよいですか？私は3つの方法を試しましたが、すべてクラッシュして燃えます。

基本的に、パッケージ名のベクトルを、それらをロードする関数に提供したいと思います。

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

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

提案された関数のいくつかの順列が機能しcharacter.onlyますTRUE。ただし、引数をに指定した場合のみです。簡単な例：

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

CRANパッケージパックマン私は（Dason Kurkiewiczでオーサリング）維持することは、これを達成することができます：

したがって、ユーザーは次のことができます。

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

パッケージが見つからない場合はp_load、CRANまたはBioconductorからダウンロードします。

これでうまくいくはずです：

lapply(x, FUN = function(X) {
    do.call("require", list(X)) 
})

（重要なのは、args引数がリストでdo.call(what, args) なければならないということです---それが単一の要素しか持っていなくても！）

パッケージを同時にインストールおよびロードしたい人のために、私はこのリンクからこの機能に出くわしました

# ipak function: install and load multiple R packages.
# check to see if packages are installed. Install them if they are not, then load them into the R session.

ipak <- function(pkg){
new.pkg <- pkg[!(pkg %in% installed.packages()[, "Package"])]
if (length(new.pkg)) 
    install.packages(new.pkg, dependencies = TRUE)
sapply(pkg, require, character.only = TRUE)
}

# usage
packages <- c("ggplot2", "plyr", "reshape2", "RColorBrewer", "scales", "grid")
ipak(packages)

代替オプションはパッケージから提供されますeasypackages。インストールしたら、最も直感的な方法でパッケージをロードできます。

libraries("plyr", "psych", "tm")

パッケージには、いくつかのパッケージをインストールする機能も含まれています。

packages("plyr", "psych", "tm")

参照はこちら。

lubripackパッケージを使用するだけで、新しいパッケージがきちんとインストールされ、すべてが1行でロードされます。

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

以下は、RStudioで上記のコードを実行した後の出力です。

パッケージのインストール方法：

以下のコードを実行してパッケージをダウンロードし、GitHubからインストールします。GitHubアカウントは必要ありません。

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

daroczigのソリューションに基づいて構築し、入力としてリストを指定したくない場合は、使用できます

# Foo
mLoad <- function(...) {
  sapply(sapply(match.call(), as.character)[-1], require, character.only = TRUE)
}

# Example 
mLoad(plyr, dplyr, data.table)

...より短い

lapply(list('plyr', 'dplyr', 'data.table'), require, character.only = TRUE)

次の関数を使用します。

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)
}

これはロードを試み、失敗した場合はインストールしてから再度ロードを試みます。

@daroczigが提供するコードは、requireをlibraryで置き換えlapply、invisible()関数内で呼び出しをラップすることで改善できると思います。したがって、改善されたコードは次のようになります。

invisible(lapply(x, library, character.only = TRUE))

このコードは、次の理由で改善されています。

1. library()require()前者はパッケージがインストールされていない場合にエラーを表示し、後者は警告を表示するだけなので、一般的にパッケージのロードよりも優先されます。さらに、をrequire()呼び出すlibrary()ので、library()直接使用しないでください。

   library("time")
   # Error in library("time") : there is no package called ‘time’
   
   require("time")
   # Loading required package: time
   # Warning message:
   # In library(package, lib.loc = lib.loc, character.only = TRUE, logical.return = TRUE,  :
   # there is no package called ‘time’

2. lapply()この場合、呼び出しによって返されて出力されるリストオブジェクトは意味がないため、出力を非表示にすることは理にかなっています。分析作業にR Notebookを使用するとします。このinvisible()関数を使用すると、リストオブジェクトの内容が抑制され、レンダリングされたNotebook ファイルが乱雑にならないようになります。

pacmanをインストールしてロードするためのチェックを追加するためのTyler Rinkerの回答のわずかなmod：

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

引用を避けるため、p_loadソリューションが好きです！