私はgithubから Functionals を読んでいます。このページの 1 つの提案は、call_function関数のリストを操作する場合に使用することでした。ページのコードは次のとおりです。
call_fun <- function(f, ...) f(...)
f <- list(sum, mean, median, sd)
lapply(f, call_fun, x = runif(1e3))
出力は次のように投稿されました。
# [[1]]
# [1] 498
#
# [[2]]
# [1] 0.498
#
# [[3]]
# [1] 0.49
#
# [[4]]
# [1] 0.29
ただし、上記の結果を再現することはできませんでした。エラーが発生しました：
Error in FUN(X[[4L]], ...) : could not find function "f"
ここで何か不足していますか？