Maple Grafikprogrammierung < Maple < Mathe-Software < Mathe < Vorhilfe
|
Ich habe diese Frage in keinem Forum auf anderen Internetseiten gestellt. Ich würde gerne wissen, wie ich in maple 9 eine Ellipse prgrammieren kann, die schritweise den Punkt P(x) berechnet und wie im "Gärtnermodell" eine Ellipse zeichnet, als würde man mit Hilfe zweier Pflöcke und einer Schnur eine Ellipse auf dem Rasen zeichnen.
|
|
| |
|
Hallo,
wie wäre es mit folgender Lösung:
with(plots):with(plottools):
| 1: | gaertner := proc(a,b,t)
| | 2: | use e=sqrt(a^2-b^2) in plots[display](
| | 3: | line([-e,0], [a*cos(t), b*sin(t)], color=blue),
| | 4: | line([e, 0], [a*cos(t), b*sin(t)], color=green),
| | 5: | point([a*cos(t), b*sin(t)]),
| | 6: | point([-e,0]), point([e,0]),
| | 7: | plot([a*cos(tau), b*sin(tau), tau=0..t]) );
| | 8: | end use:
| | 9: | end: |
Der Aufruf geschieht in folgender Weise, wobei 5 und 4 die Längen der Halbachsen sind und 30 die Anzahl der Animationsschritte:
animate(gaertner,[5,4,theta], theta=0..2*Pi, scaling=constrained, axes=none, frames = 30);
Die Zeilennummerierung sollte natürlich ignoriert werden...
Das Resultat:
[Dateianhang nicht öffentlich]
Ich hoffe, das ist in etwa das, was du dir vorgestellt hast.
Gruß
Martin
Dateianhänge:
Anhang Nr. 1 (Typ: gif) [nicht öffentlich]
|
|
|
|
