MathGroup Archive 2011

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

Search the Archive

Re: Solve the eigenvalues of the matrix A1,thx!~

  • To: mathgroup at smc.vnet.net
  • Subject: [mg123530] Re: Solve the eigenvalues of the matrix A1,thx!~
  • From: "Dr. Wolfgang Hintze" <weh at snafu.de>
  • Date: Sat, 10 Dec 2011 07:29:16 -0500 (EST)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • References: <jbq44s$iru$1@smc.vnet.net>

First of all, you must drop //MatrixForm from the definition of A1.
Furthermore I'd suggest to use simple symbols (h instead of \[HBar] 
etc.).
I had then no diffuculties to execute Eigenvalues[A1].
The result is given as a list of Roots[] commands.
It is also useful to put in some numerical data for the parameters in 
order to see results.

Regards,
Wolfgang



"? ?" <z.tong1017 at gmail.com> schrieb im Newsbeitrag 
news:jbq44s$iru$1 at smc.vnet.net...
> A1 = {{-1/2*S22*\[Chi]^2 + I*a21*\[Chi],
>    I/(2*\[HBar])*\[CapitalDelta], -I/(2*\[HBar])*\[CapitalDelta],
>    0}, {I/(2*\[HBar])*\[CapitalDelta],
>    2*S12/\[HBar] - S22*X^2/2 - 2*S11/\[HBar] -
>     I*\[Epsilon]/\[HBar] - 2*I*\[Lambda]/\[HBar],
>    0, -I/(2*\[HBar])*\[CapitalDelta]}, {-I/(2*\[HBar])*\
> \[CapitalDelta],
>    0, -2*S12/\[HBar] - S22*X^2/2 - 2*S11/\[HBar] +
>     I*\[Epsilon]/\[HBar] + 2*I*\[Lambda]/\[HBar],
>    I/(2*\[HBar])*\[CapitalDelta]}, {0, \
> -I/(2*\[HBar])*\[CapitalDelta],
>    I/(2*\[HBar])*\[CapitalDelta], -1/2*S22*\[Chi]^2 +
>     I*a21*\[Chi]}} // MatrixForm
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
> Copy above these into mathematica~
> 




  • Prev by Date: Re: NDSolve[]
  • Next by Date: Re: Precicely defining plot size
  • Previous by thread: Re: Solve the eigenvalues of the matrix A1,thx!~
  • Next by thread: Function for complex polynomial with variable number of arguments