「R」do.call 的妙用——参数更新

R 中的 do.call() 是我极少用到的一个函数，不过它在很多情况下是蛮有用的，之前我也做过简单的介绍。

它可以在实际调用函数时将参数以列表的形式传入，下面是一个简单的函数：

f <- function(x) print(x^2)

我们可以用下面的方式调用 do.call()：

do.call(f, list(x = 4))
#> [1] 16

大部分情况下这样的用法是啰嗦的，直接 f(4) 其实已经解决上面的问题了。

最近我需要批量更新参数时发现了 do.call() 的好用之处。

在批量建模时可能需要比较对建模函数设定不同的参数，我们以求和函数作为建模函数举例。

假设建模需要 4 个参数，造一个类似的求和函数：

Sum <- function(a = 1, b = 2, c = 3, d = 4) {
  return(sum(a, b, c, d))
}

而我们需要批量运行这个函数，而且只修改其中 3 个参数，另外参数是外部定义的，比如说其他使用这个函数的人。

有可能只使用 a, b, c：

Sum(a = 1, b = 3, c = 5)
#> [1] 13

也可能使用 b, c, d。

Sum(d = 1, b = 3, c = 5)
#> [1] 10

这并不能直接通过 for 循环、apply 之类的操作进行批量调用。我们来看看 do.call() 如何解决这个问题。