r - 使用字符向量强制评估多个变量

Question

有没有办法使用字符向量强制评估多个变量？

例如:

x = 1
y = 2

而不是这样做:

force( x )
force( y )

做这样的事情:

force( ls() )

Answer 1

更换 force()与 eval(as.symbol())会做的伎俩:

## Modified from an example in ?force (h.t. @flodel)
g <- function(x,y) {
    lapply(ls(), function(X) eval(as.symbol(X))) 
    function() x+y 
}
lg <- vector("list", 4)
for (i in 1:2) for (j in 1:2) lg[[i+j-1]] <- g(i,j)
lg[[1]]()
# [1] 2

这是有效的，因为如 ?force 中所述:

[force] is semantic sugar: just evaluating the symbol will do the same thing