Re: Re: Help with ParametricPlot3D in color

*To*: mathgroup at smc.vnet.net*Subject*: [mg4557] Re: [mg4480] Re: Help with ParametricPlot3D in color*From*: Elias Saab <mathes at esaab.math.missouri.edu>*Date*: Wed, 7 Aug 1996 04:18:05 -0400*Sender*: owner-wri-mathgroup at wolfram.com

Here is how one can use Color in ParametricPlot3D. Example. ParametricPlot3D[{t,t^2,t^3,RGBColor[1,0,0]},{t,0,2}] Elias Saab On Mon, 29 Jul 1996, Victoria Steblina wrote: > ivan at nauplius.rsmas.miami.edu (Ivan Lima) wrote: > > >I'm trying to plot some phase portraits of a three-dimensional system > >with ParametricPlot3D and I'd like it to plot the lines in > >color. After two days looking at the manuals I can't find any way to > >do that. Does anybody know how to do that? Sorry for posting such a > >stupid question. I'm kind of new to Mathematica graphics and any > >help will be appreciated > > >Bellow are the commands I'm using. > > >ParametricPlot3D[Evaluate[{x[t],y[t],z[t]} /. %], > > {t, 100, 20000}, PlotPoints -> 20000, > > PlotRange -> {{0, 6}, {0, 2}, {0, 1}}, > > ColorOutput -> RGBColor, > > ViewPoint -> {1.3, 2.4, 2.}] > > > Hi, > > you need to use the LineForm primitive in Graphics3D. > Do the ParametricPlot first then display the result using Show: > > ParametricPlot3D[Evaluate[{x[t],y[t],z[t]} /. %], > {t, 100, 20000}, PlotPoints -> 20000, > PlotRange -> {{0, 6}, {0, 2}, {0, 1}}, > ViewPoint -> {1.3, 2.4, 2.}] > > Show[ Graphics3D[ {LineForm[Hue[0.5]], %[[1]]}, %[[2]] ], > AspectRatio -> Automatic ] > > Latter will redisplay lines in radiant blue. For 3D surfaces analogous > directive would be the EdgeForm. > > > I hope this helps > > Vicki > > > ________________________________________________________________ > Victoria Steblina > vvs124 at rsphy1.anu.edu.au > Optical Sciences Centre > > > Australian National University > ==== [MESSAGE SEPARATOR] ====