Gleichungssystem lösen < Mathematica < Mathe-Software < Mathe < Vorhilfe
|
Status: |
(Frage) beantwortet | Datum: | 17:50 Sa 30.08.2008 | Autor: | realScav |
Hallo,..
Ich habe folgendes Problem mit Mathematica zu lösen jedoch finde ich nicht den richtigen Weg. Muss wohl noch dazu sagen, dass ich ein Mathematica Neuling bin.
Ich habe ein Gleichungssystm mit prinzipiel forgender Form:
[mm] \vmat{ a & 0 & 0 & 0 & 0 \\ 0 & b & c & 0 & 0 \\ 0 & c & b & c & 0 \\0 & 0 & c & b & 0\\ 0 & 0 & 0 & 0 & a} [/mm] * [mm] \vmat{ u1 \\ u2\\u3\\u4\\u5 }+\vmat{ 0 \\ v \\v \\v \\0}=0,
[/mm]
gesucht sind [mm] u_1, u_2,...,u_5.
[/mm]
vielen Dank schonmal
|
|
|
|
Hallo realScav,
ich habe kein Mathematica installiert, kann's also nicht selbst ausprobieren.
Versuch es mal mit folgenden Befehlen:
A = {{a,0,0,0,0},{0,b,c,0,0}.....};
b = {0,v,v,v,0};
x = {u1,u2,u3,u4,u5};
solve[A.x == b,x]
Matrix A muss natürlich komplett definiert werden!
|
|
|
|
|
Status: |
(Mitteilung) Reaktion unnötig | Datum: | 23:06 Sa 30.08.2008 | Autor: | Nicodemus |
Der Vektor b muss natürlich negativ genommen werden!
also
b = {0,-v,-v,-v,0};
ok?
|
|
|
|
|
Status: |
(Frage) beantwortet | Datum: | 12:18 So 31.08.2008 | Autor: | realScav |
Ja super hat funktioniert! Aber kannst du mir noch sagen wiso du das so eingibst. Ich habs selber mit
Solve[eqns, vars] und LinearSolve ausprobiert aber in der Form:
Solve[A*x==-B,x] oder Solve[A*x+B==0,x] da kam aber nie was gescheites raus.
Also warum A.x und nicht A*x? Hat das was mit der Matrix zu tun? Ich dachte der Punkt fordert nur ein numerisches Ergebnis.
|
|
|
|
|
In Mathematica ist das skalare Produkt von Vektoren durch "." definiert und nicht durch "*". Das Vektorprodukt zweier Vektoren a und b schreibt sich übrigens als Cross[a,b];
Gruß! N
|
|
|
|