r - 将函数列表应用于 R 中的单个参数

Question

嗨，我正在尝试将函数列表应用于 R 中的单个参数。例如，

flist <- list(F,G,H) #F,G,H are function objects

并说我想要一个列表或向量 (F(x),G(x),H(x))其中 x 是标量数。
你知道我怎么能做到这一点吗？

Answer 1

实现这一目标的最有效方法(似乎)是使用单个 lapply (而不是 3 个不同的功能)，例如

flist <- list(mean, unique, max) # Example functions list
MyScalar <- 1 # Some scalar
lapply(flist, function(f) f(MyScalar))
# [[1]]
# [1] 1
# 
# [[2]]
# [1] 1
# 
# [[3]]
# [1] 1

但是，如果所有函数都给出相同的大小/类结果，您可以使用 vapply 进一步改进它。

vapply(flist, function(x) x(MyScalar), FUN.VALUE = double(1))
## [1] 1 1 1