Re: Probleme mit Matrix-Gleichung

["knut.buettner" <knut.buettner@XXXXXXX.de>]

Hallo Eva,

SymmetricQ[Simplify[InEps]] liefert aber True, was nach Deiner 
Definition bedeutet, daß die Matrix symmetrisch ist.

Viele Grüße,

Knut Büttner

Eva Buhr schrieb:
> Liebe Mathematica Fans,
> Ich vesuche in Mathematica eine Matrix-Gleichung zu
> lösen. Ich bin  nicht sicher, ob ich das Problem
> korrekt formuliert habe.
> (X+Transpose[X] * P) * EPS==B
> Gesucht wird natürlich die Matrix X, die ebenso wie P
> und EPS quadratisch ist.
> Wobei:
> Eps=IdentityMatrix[dim]+DiagonalMatrix[ConstantArray[€,dim-1],1]+DiagonalMatrix[ConstantArray[€,dim-1],-1];
> und
> Pmat=Table[Join[ConstantArray[0,dim-i],{1},ConstantArray[0,dim-(dim-i+1)]],{i,1,dim}];
>
> "dim" bestimmt die Dimension der Matrix und ? ist eine
> Konstante.
>
> Mich interessiert, ob Mathematica eine Lösung für
> dim=16 finden kann.
> Ich habe versucht zu überprüfen, ob die
> Inverse[Eps]-Matrix symmetrisch ist. Komischerweise
> ist bis dim=11 die  Inverse[Eps] symetrisch, ab dim 12
> nicht mehr, und das verstehe ich nicht.
> Wie muss ich das Problem formulieren, damit ich eine
> elegante Lösung für X bekomme?
> Mathematica File ist in Attachment angehängt.
>
>
>       __________________________________________________________
> Gesendet von Yahoo! Mail.
> Mehr Möglichkeiten, in Kontakt zu bleiben. http://de.overview.mail.yahoo.com