Re: How To invert ColorFunction

*To*: mathgroup at smc.vnet.net*Subject*: [mg106726] Re: [mg106719] How To invert ColorFunction*From*: Vivek Joshi <vivekj at wolfram.com>*Date*: Fri, 22 Jan 2010 05:36:18 -0500 (EST)*References*: <201001211131.GAA20635@smc.vnet.net>

On 1/21/10 5:31 AM, 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. > > c4 = 1; z4[rho_, theta_] := rho^2*Cos[2*theta] RevolutionPlot3D[c4*z4[rho, theta], {rho, 0, 1}, {theta, 0, 2*Pi}, ColorFunction -> (ColorData["Rainbow", 1 - #3] &)] Vivek

**References**:**How To invert ColorFunction***From:*Vladimir <svetlana_47@yahoo.de>