Re: Surfacecoloring of a sphere

• To: mathgroup at smc.vnet.net
• Subject: [mg15755] Re: Surfacecoloring of a sphere
• From: Martin Kraus <mkraus at theorie3.physik.uni-erlangen.de>
• Date: Sun, 7 Feb 1999 02:03:41 -0500 (EST)
• Organization: Regionales Rechenzentrum Erlangen, Germany
• References: <79eb8g\$9sk@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Florian Stock wrote:
>
> Hello,
>
> for visualization of an Satellite, i want to color the surface of a
> sphere (for the colors I have a function color[long,att] with long and
> att in a  range from 0 to 2 Pi).
> How can i coloring the sphere?
> I've tried with SphericalPlot3D and the ColorFunction option, with
> ParametricPlot3D, but I didn't found a way to color it.
>
> Greetings
>
> Florian
>
> --
> "Alles was von Bedeutung ist, ist in Mathematik gegruendet.",
>  Robert A. Heinlein`s "Sternenkrieger"

I guess either long or att goes from 0 to Pi only.

With SphericalPlot3D you can choose a color (or more general any list of
graphics directives) this way:

<<Graphics`ParametricPlot3D`

SphericalPlot3D[{1,color[long,att]},{att,0,Pi},{long,0,2Pi},Lighting->False]

With ParametricPlot3D it was:

ParametricPlot3D[{Sin[att]Sin[long],Sin[att]Cos[long],Cos[att],color[long,att]},
{att,0,Pi},{long,0,2Pi},Lighting->False]

Hope that helps

Martin Kraus

```

• Prev by Date: Re: FindRoot question (number of variables)
• Next by Date: Re: Integration of very simple partwise definded functions fails
• Previous by thread: Re: Surfacecoloring of a sphere
• Next by thread: Re: Surfacecoloring of a sphere