给定函数和测试向量:
multiply_stuff <- function(...) {
arguments <- list(...)
Reduce(f = `*`, x = arguments)
}
test_vec <- c(1, 20, 3, 40, 5, 60)
我想自动创建一个未评估的
call
,列出传递向量的所有参数。在这个例子中,这相当于表达式:call("multiply_stuff",
test_vec[1],
test_vec[2],
test_vec[3],
test_vec[4],
test_vec[5],
test_vec[6])
尝试
例如,对于向量:
test_vec_B <- c(1, 5, 6, 8, 9, 11, 12, 14, 20, 11)
我希望自动列出
call("multiply_stuff",...)
中所有test_vec_B
参数。自然地,以下代码无法实现此功能:call("multiply_stuff", test_vec_B)
call("multiply_stuff", list(test_vec_B))
期望的结果
未求值表达式的等价形式:
call(
"multiply_stuff",
test_vec_B[1],
test_vec_B[2],
test_vec_B[3],
test_vec_B[4],
test_vec_B[5],
test_vec_B[6],
test_vec_B[7],
test_vec_B[8],
test_vec_B[9],
test_vec_B[10]
)
do.call
提供了类似的功能,因为它可以接受其args
的列表。 尽管如此,我仍然想要创建一个未评估的表达式,而do.call
则会进行评估。 - Konrad