将函数列表应用于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