Re: Coloring a surface
- To: mathgroup at smc.vnet.net
- Subject: [mg39114] Re: Coloring a surface
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Thu, 30 Jan 2003 01:05:48 -0500 (EST)
- Organization: Universitaet Leipzig
- References: <b183vl$koi$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
a) you can't associate a color with every *point*, because
Mathematica colors the polygon and not the vertex
b)
ParametricPlot3D[
{Cos[phi]*Sin[th],
Sin[phi]*Sin[th],
Cos[th],
SurfaceColor[Hue[4phi/(2Pi)]]},
{th, 0, Pi}, {phi, 0, 2Pi}, PlotPoints -> {30, 60}]
may help you.
Regards
Jens
"Jean P." wrote:
>
> I want plot and color a surface x=f(u,v), y=g(u,v), z=h(u,v)
>
> How to create a color function colorfunc[x,y,z] (or colorfunc[u,v])
> that associate a color at each point of the surface ??
>
> Thanks
>
> Scuse for my very bad english language !!
>
> Jean P.