DMUG-Archiv 2008

Frühere   Chronologischer Index   Spätere
Vorherige   Thematischer Index   Nächste

Re: Animation

Hallo,

Manipulate[
With[{\[Epsilon] = 0.01},
Show[
PolarPlot[
a Cot[\[Theta]], {\[Theta], -2 \[Pi] + \[Epsilon], -\[Epsilon] - \
\[Pi]}, PlotRange -> {{-3, 3}, {-3, 3}}],
PolarPlot[
a Cot[\[Theta]], {\[Theta], \[Pi] + \[Epsilon],
2 \[Pi] - \[Epsilon]}, PlotRange -> {{-3, 3}, {-3, 3}}]]
], {a, 0.5, 2.5}]

sollte es wohl machen.

Gruss
Jens

Andreas Rychen wrote:

Liebe Mathematica Fans

Ich finde die Animationsmöglichkeiten in der Version 6.0.2.0 sensationell. Neue Funktionen führen zu neuen Problemen.

Im beiliegenden Notebook „Kappa.nb“ ist eine Kurve dargestellt mit störenden und falschen Verbindungen. Der Befehl „Manipulate“ funktioniert. Im Notebook „KappaNeu.nb“ habe ich die Verbindungen eliminiert. Gibt es eine Möglichkeit, die beiden Animationen zu vereinigen?

Mit freundlichen Grüssen

Andreas Rychen



Verweise:
Frühere   Chronologischer Index   Spätere
Vorherige   Thematischer Index   Nächste

DMUG DMUG-Archiv, http://www.mathematica.ch/archiv.html