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] ====