Re: (Newbie) Applying colors to surface plots
- To: mathgroup at smc.vnet.net
- Subject: [mg21142] Re: (Newbie) Applying colors to surface plots
- From: "Allan Hayes" <hay at haystack.demon.co.uk>
- Date: Fri, 17 Dec 1999 01:21:43 -0500 (EST)
- References: <8320fm$gn0@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Fedder, I am assuming that you want to give the objects solid colors with no shading. I wonder if the following will help. gr1 = ParametricPlot3D[ {x, y , 0, Hue[0]}, {x, -2, 2}, {y, -2, 2}, PlotPoints -> 3, Lighting -> False] gr2 = ParametricPlot3D[ {0, x, y, Hue[.7]}, {x, -2, 2}, {y, -2, 2}, PlotPoints -> 3, Lighting -> False] Show[gr1, gr2] If you want to mix such solidly colored objects with ones shaded by lighting, then that is altogether more difficult. Allan --------------------- Allan Hayes Mathematica Training and Consulting Leicester UK www.haystack.demon.co.uk hay at haystack.demon.co.uk Voice: +44 (0)116 271 4198 Fax: +44 (0)870 164 0565 "Fedder Skovgaard" <mm46a at imada.sdu.dk> wrote in message news:8320fm$gn0 at smc.vnet.net... > I would like to apply a given color to a plot such as: > > ParametricPlot3D[sphere[1][a,b]//Evaluate,{a,0,Pi},{b,0,2Pi}] > > I have tried to work with SurfaceColor, but failed to get it to work. It > seems very cumbersome to apply individual light sources to get an even > color on the surface. This is even a larger challenge when combining > several graphics objects and wishing to assign colors to individual > objects. > > Thanks in advance for any recommadation >