Hallo,
> Habe die Datei angehängt. Hier schließt sich noch eine Frage an, die ich
> vergessen habe: Kann man mit Solve[] auch nach Termen
nein.
>(wie im o.g. Bsp.)
> auflösen oder muß man nach einer einzelnen Variable auflösen?
Ja.
Man kann aber auch
Solve[Eliminate[{deineGleichung, a1-a2==q},a2],q]
schreiben.
Ansonsten kommt
{{q -> ((-2 + n)*(-8 - 4*a1*(-1 + n)^2 +
(-2 + n)*n*(-12 + 5*n)) + (-4 + (8 - 3*n)*n)*
Sqrt[-8 + 4*a1*(4 + a1)*(-1 + n)^2 +
n*(40 + n*(-56 + n*(24 + n)))])/
(4*(-1 + n)^2*n)},
{q -> ((-2 + n)*(-8 - 4*a1*(-1 + n)^2 +
(-2 + n)*n*(-12 + 5*n) + (-2 + 3*n)*
Sqrt[-8 + 4*a1*(4 + a1)*(-1 + n)^2 +
n*(40 + n*(-56 + n*(24 + n)))]))/
(4*(-1 + n)^2*n)}}
raus. a1 l"asst sich nicht beseitigen.
Gruss
Jens
|