do.call()，多个参数

Question

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

有趣(A，B，C，D，E)

现在，我想将固定值a,b,c,d赋值给A,B,C,D，并将E赋值为1:7的列表

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

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

我转向，它就能工作了，

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值，但是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))