如何在Mathematica中做多个系列

Question

考虑下面的表达：

G＆＃34; Gamma＆＃34;和＆＃34; k＆＃34;给定（用户输入）。取决于＆＃34; Gamma＆＃34;值，多个系列的数量可能会改变。任何想法如何将它放在mathematica上？我不能使用嵌套循环（＆＃39; For＆＃39;循环）因为循环次数可能会因更改＆＃34而改变;伽玛＆＃34;值。

Answer 1

这应该是关闭的：

 inner[i_, gamma_, k_] :=
    Sum[(-1)^(el[1])/el[1]!
        Product[(-1)^(el[z] - el[z - 1])/(el[z] - el[z - 1])! ,{z, 2, i}], 
       Evaluate[Sequence @@ 
          ({{el[1], k, gamma}}~Join~Table[ { el[ii], el[ii - 1], gamma },
                  {ii, 2, i}])]]


 With[{gamma = 3, k = 1}, Sum[ inner[i, gamma, k], {i, gamma - 1}]]

  

-4/3

如果您定义el[0]=0，那么产品稍微更整洁，那么它只是：

 Product[(-1)^(el[z] - el[z - 1])/(el[z] - el[z - 1])! , {z,i}]

然后简化为：

 (-1)^el[i] /Product[(el[z] - el[z - 1])! , {z, 1, i}]