如何在R中创建函数列表？

Question

我有两个参数的功能，从中我喜欢 在一个参数中创建一个函数列表，如下所示：

flist <- lapply(c(1,2), function(x) { function(y) x + y })

这是为了创建两个函数的列表，第一个 其中增加了一个输入;第二个增加了两个 对它的意见。但它不起作用：

> flist[[1]](3)
[1] 5
> flist[[2]](3)
[1] 5

列表中的两个函数都会在其输入中添加两个。 我有解决方法，但它们很丑，我想了解 我做错了什么。