Das übergeordnete Ziel ist es, ein Mathematica-Programm zu schreiben, das den Startwinkel berechnet, der die größte Reichweite mit der Funktion [RandomInt] ergibt, aber ich hatte Probleme mit der Physik.
Bei der 2D-Trajektion ohne Reibung kam die größte Reichweite im Winkel .
Aber unter Verwendung des quadratischen Reibungsmodells
Wo ist die Luftdichte, ist die Querschnittsfläche des sich bewegenden Objekts (in diesem Fall ein Kreis) und ist der Luftwiderstandsbeiwert.
An diesem Punkt bin ich mir nicht sicher, wie ich das Problem einrichten soll, da ist auf beides angewiesen Und , und können nicht als linear unabhängig voneinander modelliert werden.
Einige gegebene Parameter des Kugelprojektils: (Ich gehe davon aus, dass diese Werte beim Schreiben des Programms leicht in die allgemeine Gleichung eingesetzt werden können)
Anfangsgeschwindigkeit = Zwischen Masse = 0,145 Radius = 0,0367 Luftdichte = Luftwiderstandsbeiwert = 0,46
Wie würde ich beide Geschwindigkeiten in eine Gleichung einbauen? Für einfache Kinematiken gilt einfach:
In zwei Dimensionen kann das zweite Newtonsche Gesetz in Vektorform geschrieben werden als
Insbesondere können Sie diese Gleichungen lösen, indem Sie die Anfangsposition angeben und die Anfangsgeschwindigkeit Wo ist der Anfangswinkel, in dem das Projektil abgefeuert wird.
Sie wissen, dass der Luftwiderstand unter den gegebenen kontrollierten Bedingungen in jeder Richtung gleich ist, also müssen Sie nur die Komponente der Geschwindigkeit in der Richtung berechnen, eine senkrecht und die andere parallel zur Bezugsachse und dann die Geschwindigkeit auf beiden Seiten berechnen und dann berechnen der Radius. Wenn Ihnen das geholfen hat, ist es in Ordnung, oder wenn Sie möchten, werde ich es für Sie lösen
Ich schlage vor, eine Funktion zu definieren das gibt Ihnen die Reichweite des Projektils für einen bestimmten Winkel. Berechnen Numerisches Lösen der ODE (Sie könnten für diese Aufgabe eine Runge-Kutta-Methode verwenden http://en.wikipedia.org/wiki/Runge%E2%80%93Kutta_methods )
QMechaniker