打印中间结果 Sum 函数

Question

我在 Wolfram Mathematica 中编写了简单的代码：

x = 2
k = 0
n = 15
total = Sum[((-1^k)*(x^(4*k + 1))) / (((2*k)!) * (4*k + 1)), k, n]

我想要打印结果（所有成员的总和）和打印所有（!!!）中间结果函数Sum。这是怎么做到的？

Answer 1

尝试

x=2;k=0;n=15;
Table[((-1^k)*(x^(4*k+1)))/(((2*k)!)*(4*k+1)),{k,n}]

这为您提供了一个包含 15 个元素的列表。

请注意，我将 k,n 更改为 {k,n}。

然后 Total[%] 将它们相加以求和。

Answer 2

您的语法计算的是不定和的倍数，例如

Sum[Defer[g + h], g, h]

如果您在 k, n 两边加上括号，您将获得 Bill 的答案显示的总和。

total = Sum[((-1^k)*(x^(4*k + 1)))/(((2*k)!)*(4*k + 1)), {k, n}]

Print intermediate result Sum function