Re: 3D plots in different colors
- To: mathgroup at smc.vnet.net
- Subject: [mg61697] Re: [mg61552] 3D plots in different colors
- From: "Jose Luis Gomez" <jose.luis.gomez at itesm.mx>
- Date: Wed, 26 Oct 2005 01:01:56 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Hello Felix:
<< Graphics`SurfaceOfRevolution`;
s1 = Show[Graphics3D[SurfaceColor[RGBColor[1, 0, 0.5]]],
SurfaceOfRevolution[x^2, {x, 0, 2}]];
s2 = Show[Graphics3D[SurfaceColor[RGBColor[0.0, 0.0, 0.9]]],
SurfaceOfRevolution[x^2, {x, 2, 2.5}]];
Show[s1, s2]
I hope that helps
Jose Luis
http://homepage.cem.itesm.mx/lgomez/
-----Mensaje original-----
De: Felix Campelo [mailto:felixcampelo at gmail.com]
Enviado el: Viernes, 21 de Octubre de 2005 11:36 p.m.
Para: mathgroup at smc.vnet.net
Asunto: [mg61552] 3D plots in different colors
I want to make a 3dplot with the command SurfaceOfRevolution, such
that, for instance, for z<0 the surface looks green, and for z>0 it
looks blue (with the usual shadows). I tried plotting themn separately
and changing the light source, but when I do Show[plot1,plot2],
everything is in the same color...