Hallo,
und
Manipulate[
With[{\[Epsilon] = 0.0001},
PolarPlot[
a Cot[\[Theta]], {\[Theta], -\[Pi] + \[Epsilon], \[Pi] - \
\[Epsilon]}, PlotRange -> 3, Exclusions -> {\[Theta] == 0}]], {a, 0.5,
2.5}]
ist noch schöner.
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