Re: 3D Plot

*To*: mathgroup at smc.vnet.net*Subject*: [mg51756] Re: 3D Plot*From*: "Steve Luttrell" <steve_usenet at _removemefirst_luttrell.org.uk>*Date*: Mon, 1 Nov 2004 02:52:32 -0500 (EST)*References*: <cm20d9$g4h$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Here is an example based on a 3D plot in the Graphics`ParametricPlot3D` documentation: <<Graphics`ParametricPlot3D` ParametricPlot3D[{Cos[u] Cos[v],Sin[u] Cos[v],Sin[v],EdgeForm[]},{u,0,2Pi,Pi/20},{v,-Pi/2,Pi/2,Pi/20}, LightSources->{{{1,0,1},RGBColor[1,0,0]}}]; Comments: 1. The 4th coordinate is represented in plots by using graphics properties (there are no spatial dimensions left to use!). In this case EdgeForm[] is used to suppress the mesh lines. 2. The option LightSources is used to control the placement of the light sources. Here LightSources->{{{1,0,1},RGBColor[1,0,0]}} is used to create a single red light source that illuminates the part of the plot that is visible. Steve Luttrell "Flurchick, Kenneth M" <FLURCHICKK at MAIL.ECU.EDU> wrote in message news:cm20d9$g4h$1 at smc.vnet.net... > GentleBeings > I must be missing something simple > I have a CylindricalPlot3D and I want the > object to have no mesh lines and be one single color > I note the RealTime3D ignores EdgeForm[] > Lighting->False with COlorFunction does not seem to do it > and I just cannot seem to find the right incantation > > I looked at the archives and could not find it there either > kenf >