Maxima 极大值下的更紧解

我有以下代码：

for n:1 thru 11 do for j:1 thru 21 do v[n,j]:1/sqrt(dp)* 
(sum(eigenfunctionsort[n,j]*exp(%i*2*%pi*m*x/dp),m,-10,10));

在前面定义了特征函数排序的地方，x是一个变量，我将在后面进行积分，我对m求和

当我打印v[1,1]时，我得到一个很长的方程。我怎样才能让Maxima把这些东西浓缩成有意义的东西，这样我就可以检查我的结果了

最好的，

---

Ben

尝试“trigsimp”函数或映射（trigsimp，您的_表达式）。不确定它是否有用，但值得一试。再看看“demoivre”。

我不知道你的向量本征函数排序或你的“大而长的讨厌的方程”是什么样子，但我经常从Maxima得到复本征值和本征向量，即使我知道它们应该是简单而真实的

比如说,

(%i1) A : matrix([1, 4, 1], [4, 1, 9], [1, 9, 1]);
(%i2) eigenvalues(A);

弄得一团糟。它可以通过应用

rectform

将输出转换为笛卡尔形式，然后应用

trigreduce

减少结果的虚部来简化。最后，您可以转换 结果转换为浮点：

(%i3) rectform(%)$
(%i4) trigreduce(%)$
(%i5) float(%);