MathGroup Archive 2005

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

Search the Archive

Re: Colored Surface


The easiest way is probably the following:

In[1]:= <<Graphics`Shapes`

In[2]:= Show[Graphics3D[{Blue, Sphere[1, 50, 50]}], Lighting -> False]

You can add additional directives and options to get fancier effects 
such as a blue sphere that reflects the light source:

In[3]:= Show[Graphics3D[{EdgeForm[], SurfaceColor[Blue, White,
       50], Sphere[1, 50, 50]}], LightSources -> {{{1, 1, 2}, White}}]

-Jeff

--------------
Jeff Bryant
Wolfram Research, Inc.


Hannachi wrote:

> How to do a just blue sphere (for example) ?


  • Prev by Date: Re: Colored Surface
  • Next by Date: Re: Colored Surface
  • Previous by thread: Colored Surface
  • Next by thread: Re: Colored Surface