将函数从参数传递到嵌套函数

Question

我简而言之，我想运行以下最小的代码：

library(plyr)

surround = function(my.df, my.var, my.val, my.method) {
    ddply(my.df, my.var, summarize, value = my.method(as.name(my.val)))
}

my.df = data.frame(group = rep(letters[1:4], times = 25),
                   x = rnorm(100))

surround(my.df, "group", "x", mean)

然而，这会导致Error: could not find function "my.method"。我确实意识到这是一个范围问题，我应该使用eval或substitute，但我无法弄明白。

Answer 1

如果使用自定义功能而不是汇总功能，则可以使用。

 ReferenceError: functionToPostParameters is not defined