r - do.call()，多个参数

Question

我有一个有很多参数的函数：

有趣（A、B、C、D、E）

现在我想为 E 分配固定值a,b,c,d并A,B,C,D分配一个 1 : 7 的列表

我想do.call()如下使用，但它不起作用。

a <- do.call(function(x) fun(A = a, B = b, C = c, D = d, E = x), list(1:7))

我转向 lapply，它有效，

a <- lapply(c(1:7), function(x) fun(A = a, B = b, C = c, D = d, E = x))

正如 Joshua Ulrich 的回答，当我尝试

a `<- do.call(fun, list(A = a, B = b, C = c, D = d, E = list(1:7)))`

它说

(list) object cannot be coerced to type 'double'

所以我猜 fun 需要 E 的 double 值，但是 do.call() 并没有一个一个地给出值，而是一个列表。

我不想使用lapply，因为它返回一个列表列表，如果我想指向一个特殊列表，我必须使用 [[]]，并且 [[]] 中只允许单个值，并且我不能使用矢量指向，例如 [[a]]，带有 <- c(1:7)。

如何使 do.call() 工作？

Answer 1

那应该是：

a <- do.call(fun, list(A = a, B = b, C = c, D = d, E = list(1:7)))

我有一种感觉，你想E成为一个向量，而不是一个列表，在这种情况下它应该是：

a <- do.call(fun, list(A = a, B = b, C = c, D = d, E = 1:7))