Re: DiagonalizableQ
- To: mathgroup at smc.vnet.net
- Subject: [mg122107] Re: DiagonalizableQ
- From: "Hans Michel" <hmichel at cox.net>
- Date: Fri, 14 Oct 2011 05:53:57 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <201110130748.DAA02360@smc.vnet.net>
There is no Mathematica built-in function called " DiagonalizableQ" It is defined (constructed) just above "DiagonalizableQ[{{0, 1}, {0, 0}}]" example as DiagonalizableQ[m_?MatrixQ /; Apply[Equal, Dimensions[m]]] := Module[{s, j}, {s, j} = JordanDecomposition[m]; Length[ Cases[ArrayRules[j][[1 ;; -2, 1]], {i_, j_} /; j == i + 1]] == 0 ]; Hans -----Original Message----- From: Jim Kochanski [mailto:jwkochanski at vcu.edu] Sent: Thursday, October 13, 2011 2:48 AM To: mathgroup at smc.vnet.net Subject: [mg122107] DiagonalizableQ When I cut and paste "DiagonalizableQ[{{0, 1}, {0, 0}}]" >From the following, which can be found under Applications at http://reference.wolfram.com/mathematica/ref/JordanDecomposition.html... >> Test if a particular matrix is diagonalizable: >> In[2]:= DiagonalizableQ[{{0, 1}, {0, 0}}] >> Out[2]= False I get... Out[2]= DiagonalizableQ[{{0, 1}, {0, 0}}] and not False Can anyone give me some direction on using DiagonalizableQ? Thanks! Sincerely, Jim ------------------------------------------------- James W. Kochanski Cell (804) 647-4675 =E2=86=90 =E2=86=90 =E2=86=90 Preferred Home (804) 639-2579 jwkochanski at vcu.edu jkochanski at jtcc.edu jim at kochanski.us -------------------------------------------------
- References:
- DiagonalizableQ
- From: Jim Kochanski <jwkochanski@vcu.edu>
- DiagonalizableQ