Re: How To invert ColorFunction
- To: mathgroup at smc.vnet.net
- Subject: [mg106753] Re: [mg106719] How To invert ColorFunction
- From: Patrick Scheibe <pscheibe at trm.uni-leipzig.de>
- Date: Fri, 22 Jan 2010 05:41:43 -0500 (EST)
- References: <201001211131.GAA20635@smc.vnet.net>
Hi,
what about
c4 = 1;
z4[rho_, theta_] := rho^2*Cos[2*theta]
RevolutionPlot3D[c4*z4[rho, theta], {rho, 0, 1}, {theta, 0, 2*Pi},
ColorFunction -> Function[{x, y, z}, ColorData["Rainbow"][1 - z]]]
?
Cheers
Patrick
On Thu, 2010-01-21 at 06:31 -0500, Vladimir wrote:
> Hi everybody,
>
> I am plotting Zernike-Polynomials like this:
>
> ---------
> c4 = 1;
>
> z4[rho_, theta_] := rho^2*Cos[2*theta]
>
> RevolutionPlot3D[c4*z4[rho, theta], {rho, 0, 1}, {theta, 0, 2*Pi},
> ColorFunction -> "Rainbow"]
> ---------
>
> To be able to compare the plot to measured data from an
> interferometer, I would like to invert the Rainbow colouring, that is
> red at the bottom and blue on top. However, I can't find to work this
> out. Does anyone know how to do this?
>
> Thank you,
> Vladimir.
>
- References:
- How To invert ColorFunction
- From: Vladimir <svetlana_47@yahoo.de>
- How To invert ColorFunction