Mathematica

Neue Frage »

Theend9219 Auf diesen Beitrag antworten »
Mathematica
Hallo Augenzwinkern

Ich sitze vor einer Aufgabe und finde keinen Lösungsweg es geht um Mathematica und ich soll eine DGL lösen.



wobei


Lösen soll ich nun die DGL für und

Das ist das was ich bisher gemacht habe:

code:
1:
2:
3:
function[a_, f_, t_, b_] := a * Cos[f *t + b];
Dsolve[x''[t] + 2 g x'[t] + w^2 x[t] == function[a_, f_, t_, b_]/(m)
  ,x[t],t]


Aber ich komme auf keine Lösung, vielleicht kann mir wer weiter helfen ..
Liebe Grüße
Huggy Auf diesen Beitrag antworten »
RE: Mathematica
Allgemein: Beim Aufruf einer Funktion dürfen keine Underliner hinter die Variablen. Wenn eine Lösung für konkrete Werte der Parameter gesucht ist, muss die Funktion mit diesen Werten aufgerufen werden. Probier mal das:

code:
1:
2:
F[t_, a_, b_, f_] := a*Cos[f*t + b];
FullSimplify[DSolve[x''[t] + 2*0.1*x'[t] + 4*x[t] == F[t, 1, 0, 1]/m, x[t], t]]
Die Imaginärteile der Lösung kannst du ignorieren. Das sind numerische Artefakte.
Theend9219 Auf diesen Beitrag antworten »
RE: Mathematica
Danke Augenzwinkern ))
Neue Frage »
Antworten »



Verwandte Themen

Die Beliebtesten »
Die Größten »
Die Neuesten »