3D Blume in Mathematica < Mathematica < Mathe-Software < Mathe < Vorhilfe
|
| Status: |
(Frage) beantwortet  | | Datum: | 18:00 Sa 22.01.2005 | | Autor: | beyec1 |
Mit Hilfe von Mathematica habe ich eine Blume erstellt (ParameticPlot3D). Nun suche ich Hilfe. Gerne würde ich meiner Blume einen 3D- Look mit Farbe verpassen. Hier ist mein Code:
Module[{x, y, z},
x = (0.3 + 0.55 Cos[5 t] - 0.15 Cos[15 t]) Cos[2 t];
y = (0.3 + 0.55 Cos[5 t] - 0.15 Cos[15 t]) Sin[2 t];
z = Abs[0.05 + 0.275 Cos[5 t] - 0.075 Cos[15 t] - 0.1 Cos[10 t]];
ParametricPlot3D[{x, y, z}, {t, -Pi, Pi},
PlotPoints -> 400, Boxed -> False, Axes -> None]]
Besten Dank für Eure Tips,
Chris
Ich habe diese Frage in keinem Forum auf anderen Internetseiten gestellt.
|
|
| |
|
| Status: |
(Antwort) fertig  | | Datum: | 08:58 Mi 02.02.2005 | | Autor: | PStefan |
Ich habe auch Mathematka und, deshalb weiß ich, dass es mit PlotStyle->{...}funktionieren müsste. Könnte aber sein, dass du eine andere Version hast. Schonst schau bitte in der Hilfe nach.
MfG
Stefan
|
|
|
|
