do.call根据一个名称或函数以及要传递给它的参数列表构造并执行一个函数调用。
Usage:
do.call(what, args, quote = FALSE, envir = parent.frame())
x <- list(
c(1, 2),
c(3, 4),
c(5, 6)
)
do.call(what = 'sum', args = x)
do.call(what = sum, args = x)
do.call(sum, x)
# expand.grid函数:从因子变量的所有组合创建数据框
tmp <- expand.grid(letters[1:2], 1:3, c("+", "-"))
do.call("paste", c(tmp, sep = ""))
do.call(paste, list(as.name("A"), as.name("B")), quote = TRUE)
do.call(paste, list("A", "B"))
A <- 2
f <- function(x) print(x^2)
env <- new.env()
assign("A", 10, envir = env)
assign("f", f, envir = env)
f <- function(x) print(x)
f(A) # 2
is.environment(.GlobalEnv) # [1] TRUE
do.call("f", list(A)) # 2
do.call("f", list(A), envir = env) # 4
do.call("f", list(quote(A))) # 2
do.call("f", list(quote(A)), envir = env) # 100
A # [1] 2
quote(A) # A
参考