Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

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

Search the Archive

Re: SphericalPlot3D ColorFunction problem

  • To: mathgroup at smc.vnet.net
  • Subject: [mg104692] Re: SphericalPlot3D ColorFunction problem
  • From: Roland Franzius <roland.franzius at uos.de>
  • Date: Sat, 7 Nov 2009 06:46:48 -0500 (EST)
  • References: <hd0spr$7jb$1@smc.vnet.net>

Porscha Louise McRobbie schrieb:
> Hello,
> 
> Can anyone explain why the following simple plot is a single color?
> 
> SphericalPlot3D[Abs[Cos[t]], {t, 0, Pi}, {p, -Pi, Pi},
>   ColorFunction -> Function[{t}, Hue[Arg[Cos[t]]/(2. Pi)]],
>   ColorFunctionScaling -> False]
> 
> Arg[Cos[t]]/(2. Pi)] should be zero for t<Pi/2, and 0.5 for t>Pi/2, so  
> I expect the the upper lobe of the plot to be red (Hue[0]) and the  
> lower lobe to be cyan (Hue[0.5]).  Is there something different about  
> ColorFunctions in SphericalPlot3D compared with Plot3D?

The graphics argument you want to pass probably should be #4

SphericalPlot3D[Abs[Cos[t]], {t, 0, Pi}, {p, -Pi, Pi},
  ColorFunction -> (Hue[Arg[Cos[#4]]/(2 Pi)] &),
  ColorFunctionScaling -> False]

-- 

Roland Franzius


  • Prev by Date: Re: Wrong limit?
  • Next by Date: Re: SphericalPlot3D ColorFunction problem
  • Previous by thread: Re: SphericalPlot3D ColorFunction problem
  • Next by thread: Re: SphericalPlot3D ColorFunction problem