我想知道如何将函数作为参数添加到函数中。
有很多函数可以将函数作为参数，例如do.call（）和summarise（）等。
为了使我的功能更通用，我发现了这个问题。
test_func <- function(x = "value",
f = "function"){
x %>% f
}
在下面的两个示例中，期望的结果是正确的。
test_func(x = c(1,2,3,4,5),
f = mean())
要么
test_func(x = c(1,2,3,4,5),
f = "mean")
应该等于：
c(1,2,3,4,5) %>% mean()
findMean <- function(x, FUN = mean, ...){
mean_of_x <- x%>% FUN(...)
print(mean_of_x)
}
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
我来说两句