cd0054115 发表于 2008-3-16 15:55

[求助]Mathematica5怎么将矩阵对角化?

<p>Mathematica5怎么将矩阵对角化?</p><p>用Eigenvalues[]好象是可以,但太复杂,只要对角元素就可以了!</p><p>例如:{{a,b},{c,d}-----&gt;{{a,0},{0,d-bc/a}}}就可以了!</p><p>不用Eigenvalues[{{a, b}, {c, d}}]------&gt;{1/2(a+d-Sqrt),1/2(a+d+Sqrt[a^2+4bc-2ad+d^2)}</p><p>谢谢!</p>

madio 发表于 2008-3-17 09:14

<p>上个帖子就回过了!</p><p>In:=<br/>JordanDecomposition[{{a,b},{c,d}}]</p><p>Out=<br/>\!\({{{\(a - d - \@\(a\^2 + 4\ b\ c - 2\ a\ d + d\^2\)\)\/\(2\ c\), \(a - d + \<br/>\@\(a\^2 + 4\ b\ c - 2\ a\ d + d\^2\)\)\/\(2\ c\)}, {1, 1}}, {{1\/2\ \((a + d \<br/>- \@\(a\^2 + 4\ b\ c - 2\ a\ d + d\^2\))\), 0}, {0, 1\/2\ \((a + d + \@\(a\^2 \<br/>+ 4\ b\ c - 2\ a\ d + d\^2\))\)}}}\)</p>
页: [1]
查看完整版本: [求助]Mathematica5怎么将矩阵对角化?