string - 从字符串加载R包

Question

我想创建一个函数，其中包括加载我在函数中制作的包。一个简短的例子(它没有运行!):

loadMe <- function(name){
    genLib(xxx, libName = name) #make a new library with name "name"
    library(name)               #load the new library...
}

这不起作用!一些可重现的代码说明了我的主要问题:

library(ggplot)         #this works fine
load.this <- "ggplot"
library(load.this)      #I want this to load ggplot!

我知道问题在于 library()和 require()将尚不存在的对象名称作为参数。我试过用 parse() 包裹我的字符串, deparse() , substitute() , expression() , quote()等。这些都返回相同的问题:

library(load.this)
# Error in library(loadss) : there is no package called 'loadss'
library(deparse(load.this))
# Error in library(deparse(loadss)) : 'package' must be of length 1

有没有办法做到这一点？

Answer 1

使用 character.only争论

foo <- "ggplot2"
library(foo,character.only=TRUE)