Group Abstract Group Abstract

Message Boards Message Boards

0
|
3.5K Views
|
2 Replies
|
1 Total Like
View groups...
Share
Share this post:

Calculate the elementary divisors of a matrix

Posted 3 years ago
POSTED BY: Hongyi Zhao
2 Replies
Posted 3 years ago
POSTED BY: Hongyi Zhao

If I am not mistaken, this can be handled pretty much same as was done in your prior question on rational canonical forms.

mat = {{-x, -1, 0}, {0, -x, -1}, {-1, 0, -x}};
{uu, ss, vv} = ResourceFunction["PolynomialSmithDecomposition"][mat]
Diagonal[ss]

(* Out[1062]= {{{0, 0, -1}, {-1, 0, x}, {x, -1, -x^2}}, {{1, 0, 0}, {0, 
   1, 0}, {0, 0, 1 + x^3}}, {{1, 0, -x}, {0, 1, x^2}, {0, 0, 1}}}

Out[1063]= {1, 1, 1 + x^3} *)
POSTED BY: Daniel Lichtblau
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard