R 从闭包生成函数列表

有没有办法通过这种方式从闭包生成函数列表？或者围绕我可能希望以这种方式处理的问题的一般最佳实践？

它在3.2.0中改变行为的原因是news（）文件中的以下声明：

高阶函数，如apply函数和Reduce（）now 将参数强制应用于它们应用的函数，以消除 惰性计算和变量捕获之间的不良交互 闭关自守。这就解决了PR#16093

---

我无法复制输出。。第一次我得到25分。使用

R版本3.2.2

@FrankP。你以前的版本是什么？如果你使用

news（version==“3.2.0”&grepl（“Higher”，Text））

来获得这个答案，这个答案会更酷。哈哈，开玩笑吧。实际上我在浏览器中打开了新闻，然后在

force

上搜索。所以我想我应该写：。。。。。。“卢克，

news（）

force”。

power <- function(exp) {
  function(x) {
    x ^ exp
  }
}
funlist <- lapply(2:3, power)

> funlist[[1]](5)
[1] 125
> funlist[[2]](5)
[1] 125