如何在Mathematica中显示求和函数而不是扩展整个系列?

时间:2014-06-29 03:24:21

标签: wolfram-mathematica

我正在尝试为我的家庭作业计算衍生作品,而家庭作业正在使用Summation系列,我已在我的代码的第一行显示。

Mathematica在本系列中为我扩展了所有条款。我想知道是否有一种方法可以让它使用Epsilon标志返回结果。

f[x_]=Sum[k*Exp[-Subscript[a,k]*x^3],{k,1,7}]

E^(-x^3 Subscript[a, 1]) + 2 E^(-x^3 Subscript[a, 2]) + 
 3 E^(-x^3 Subscript[a, 3]) + 4 E^(-x^3 Subscript[a, 4]) + 
 5 E^(-x^3 Subscript[a, 5]) + 6 E^(-x^3 Subscript[a, 6]) + 
 7 E^(-x^3 Subscript[a, 7])

f'[x]

-3 E^(-x^3 Subscript[a, 1]) x^2 Subscript[a, 1] - 
 6 E^(-x^3 Subscript[a, 2]) x^2 Subscript[a, 2] - 
 9 E^(-x^3 Subscript[a, 3]) x^2 Subscript[a, 3] - 
 12 E^(-x^3 Subscript[a, 4]) x^2 Subscript[a, 4] - 
 15 E^(-x^3 Subscript[a, 5]) x^2 Subscript[a, 5] - 
 18 E^(-x^3 Subscript[a, 6]) x^2 Subscript[a, 6] - 
 21 E^(-x^3 Subscript[a, 7]) x^2 Subscript[a, 7]

非常感谢!

1 个答案:

答案 0 :(得分:1)

使用HoldForm显示总和: -

HoldForm[Sum[k*Exp[-Subscript[a, k]*x^3], {k, 1, 7}]]

您可以使用E代替Exp将输出显示为eTraditionalForm可能会进一步改善外观: -

HoldForm[Sum[k*E^(-Subscript[a, k]*x^3), {k, 1, 7}]] // TraditionalForm

enter image description here