Hallo,
wie es in der Online-Hilfe steht
p3Dplot=ParametricPlot3D[ { t, Cos[ 2 Pi 1 t ], Sin[ 2 Pi 1 t ] ,
AbsoluteThickness[5]}, { t, 0, 5 }, PlotPoints -> 300 ]
p3Dploty =
ParametricPlot3D[ { t, Cos[ 2 Pi 1 t ], -1 ,RGBColor[1,0,0]}, { t, 0,
5 },
PlotPoints \[Rule] 300 ]
p3Dplotx =
ParametricPlot3D[ { t, 1, Sin[ 2 Pi 1 t ] ,RGBColor[0,1,0]}, { t, 0, 5 },
PlotPoints \[Rule] 300 ]
Show[ { p3Dplot , p3Dploty, p3Dplotx } ,
FaceGrids \[Rule]{ { -1,0,0}, { 0, 1,0 }, { 0,0,-1} } ]
Gruss
Jens
Gunter Woysch wrote:
Stuttgart, den 14. Februar 2007
An alle Mathematica-Kundigen !
Wie erhalte ich unterschiedliche Strichstaerken fuer mehrere
mit ParametricPlot3D erstellte 3D-Linien, die gemeinsam - aber eben
unterschiedlich - dargestellt werden sollen ?
Alle Details finden sich im beigefuegten Notebook !
Vielen Dank fuer jeden Hinweis !
Mit freundlichen Gruessen,
Gunter Woysch
------------------------------------------------------------------------