MathGroup Archive 2011

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: DiagonalizableQ

  • To: mathgroup at smc.vnet.net
  • Subject: [mg122102] Re: DiagonalizableQ
  • From: mmausr <opngid at gmail.com>
  • Date: Fri, 14 Oct 2011 05:53:03 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • References: <j765a1$2cg$1@smc.vnet.net>

Evaluate the function definition below first:

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
   ];

It is not a built-in function ... which is why the function is defined
in the help page.




  • Prev by Date: MLInitialize MLEnvironment
  • Next by Date: Localizing $Assumptions
  • Previous by thread: Re: DiagonalizableQ
  • Next by thread: Re: DiagonalizableQ