在循环中创建函数R.

Question

我想创建任意数量的函数f_1，f_2，...，f_n。

我不知道如何制作像

这样的循环

for ( i in 1:n) { 
  f_i = function(x) { exp(x*i) }
end

----编辑：

我真正想做的是创建n个函数，将所有函数相乘，然后将产品函数集成n次。之后，创建一个循环，在每次迭代中创建一个新函数（积分）。让我们说吧，

1. 创建f（x1，...，xn）= f_1（x1）* ... * f_n（x_n）（我们可以使用f_i上面的指数）

2. 然后像

   这样的循环

   for (i=1:(n-1)){
     f(x1,...,x(n-i)) <- integrate(f, lower=x(n-i), upper=10)
   }
   

此循环应以数字结尾，但每次迭代都应该给出一个新函数，其中一个变量小于前一个变量。