在 R 中将包名称作为参数传递

Question

我发现自己经常使用install.package 函数，尤其是当我必须尝试其他人的代码或运行示例时。

我正在编写一个安装和加载包的函数。我尝试了以下方法，但没有成功：

inp <- function(PKG)
{
  install.packages(deparse(substitute(PKG)))
  library(deparse(substitute(PKG)))
}

当我输入 inp(data.table) 时，它说

Error in library(deparse(substitute(PKG))) : 
  'package' must be of length 1

在这种情况下，如何将库名称作为参数传递？ 如果有人也可以指导我了解有关将任何类型的对象作为参数传递给R 中的函数的信息，我将不胜感激。

Answer 1

library() 抛出错误，因为它默认接受字符 或 名称作为其第一个参数。它在第一个参数中看到deparse(substitute(PKG))，并且在查找时找不到该名称的包，这是可以理解的。

设置character.only=TRUE，告诉library() 期待一个字符串作为它的第一个参数，应该可以解决这个问题。试试这个：

f <- function(PKG) {
    library(deparse(substitute(PKG)), character.only=TRUE)
}

## Try it out
exists("ddply")
# [1] FALSE
f(plyr)
exists("ddply")
# [1] TRUE