Wolfram mathematica 薛定谔&x27；数学中的s方程

我想知道是否有办法让mathematica找到薛定谔方程的解[(−h^2/2m）（d^2ψ/dx^2）+kx^2ψ=Eψ]对于以原点为中心的粒子。当我尝试输入和计算等式时，我不断得到一个标记加保护错误

如果您键入

 eqn = (-h^2/2 m) D[\[Psi][x], {x, 2}] + k x^2 \[Psi][x] == e \[Psi][x]

 DSolve[eqn, \[Psi][x], x]

Mathematica会回来的

\[Psi](x)->Subscript[c, 1] Subscript[D, (Sqrt[2] e-h Sqrt[k] Sqrt[m])/(2 h Sqrt[k] Sqrt[m])]
 ((2^(3/4) Power[k, (4)^-1] x)/(Sqrt[h] Power[m, (4)^-1]))+Subscript[c, 2] 
 Subscript[D, (-Sqrt[2] e-h Sqrt[k] Sqrt[m])/(2 h Sqrt[k] Sqrt[m])]((I 2^(3/4) 
 Power[k, (4)^-1] x)/(Sqrt[h] Power[m, (4)^-1]))

---

请记住，D代表抛物面圆柱，下标[c，1]和下标[c，2]是积分常数。

输入方程时，您很可能使用的是

=

，而不是

=

？