R语言-引用函数对象作为参数

问题描述

如何在在R的函数中通过字符串调用别的函数。
以下面为例子：

testFun <- function(Fun){
   x <- 1:100
   Fun(x)
}

解法

这个问题没什么其实很笨，就是想记录一下。

#1. 直接调用
testFun <- function(Fun){
   x <- 1:100
   Fun(x)
}
testFun(sum) # 5050
testFun(Fun = function(x) sum(x) + 1) # 5051


#2. do.call
testFun <- function(Fun){
   x <-