Как диагонализировать в Математике квадратную симметричную матрицу?
Одной команды, если мне не изменяет память, нет. А диагонализировать можно по формулкам, которые пишут в учебниках:
Код:
myMatrix = Table[Random[], {i, 10}, {j, 10}]
eigenVecs = Eigenvectors[myMatrix]
Chop[Inverse[Transpose[eigenVecs]].myMatrix.Transpose[eigenVecs]]
На Сhop особого внимания можно не обращать, это чтобы чистые нолики стояли вне диагоналей.