我试图告诉maxima关于hermite多项式的递归关系:
我的第一个表达是这样的:
phi[0]:exp(-1/2*x^2);
phi[1]:sqrt(2)*x*phi[0];
wxplot2d([phi[0],phi[1]], [x,-5,5]);
到目前为止一直很好,但我现在想通过以下方式定义所有其他人:
phi[n]:sqrt(2/n)*x*phi[n-1] - sqrt((n-1)/n)*phi[n-2];
这只是炸弹(堆栈溢出)。我真的想说什么呢
wxplot2d(phi [10],[x,-5,5])会给我一个明智的图片吗?
答案 0 :(得分:5)
有多种方法可以解决这个问题。这是一种有效的方法。
(%i2) phi[n](x) := sqrt(2/n)*x*phi[n-1](x) - sqrt((n-1)/n)*phi[n-2](x) $
(%i3) phi[0] : lambda ([x], exp(-1/2*x^2)) $
(%i4) phi[1] : lambda ([x], sqrt(2)*x*phi[0](x)) $
(%i5) phi[0];
(%o5) lambda([x],exp((-1)/2*x^2))
(%i6) phi[1];
(%o6) lambda([x],sqrt(2)*x*phi[0](x))
(%i7) phi[2];
(%o7) lambda([x],sqrt(2)*x^2*%e^-(x^2/2)-%e^-(x^2/2)/sqrt(2))
(%i8) phi[3];
(%o8) lambda([x],
sqrt(2)*x*(sqrt(2)*x^2*%e^-(x^2/2)-%e^-(x^2/2)/sqrt(2))/sqrt(3)
-2*x*%e^-(x^2/2)/sqrt(3))
(%i9) phi[10];
<very large expression here>
(%i10) plot2d (%, [x, -5, 5]);
<nice plot appears>
这使用了所谓的数组函数。对于任何整数n
,phi[n]
是lambda表达式(未命名函数)。
请注意,这仅适用于文字整数(例如,0,1,2,3,...)。如果您需要使用phi[n]
n
作为符号,我们可以寻找不同的方法。