MathGroup Archive 1996

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Help with ParametricPlot3D in color


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


  • Prev by Date: Re: ListPlot the output of Print
  • Next by Date: Re: Exporting and Editing MMA Graphics?
  • Previous by thread: Re: Help with ParametricPlot3D in color
  • Next by thread: Help!! Kernel shutting down(pc)