R:在参数列表中应用函数列表

Question

假设我在列表中有多个函数,在另一个列表中有几个参数(它们的排列方式使每个函数调用正确的参数):

fun_list <- list(f1, f2, f3)
arg_list <- list(a1, a2, a3)

R中是否有一个函数可以分别在arg_list上应用fun_list？更具体地说,我想:

fun_apply(fun_list, arg_list) == list(f1(a1), f2(a2), f3(a3))

Answer 1

使用Map.(Map基本上mapply是默认值SIMPLIFY = FALSE.)例如:

fns <- list(mean, median, sum)
values <- list(1:5, 3:7, 5:9)
Map(
  function(fn, value)
  {
    fn(value)
  },
  fns,
  values
)