Re: How To invert ColorFunction

*To*: mathgroup at smc.vnet.net*Subject*: [mg106744] Re: [mg106719] How To invert ColorFunction*From*: Bob Hanlon <hanlonr at cox.net>*Date*: Fri, 22 Jan 2010 05:39:50 -0500 (EST)*Reply-to*: hanlonr at cox.net

RevolutionPlot3D[c4*z4[rho, theta], {rho, 0, 1}, {theta, 0, 2*Pi}, ColorFunction -> (ColorData["Rainbow"][1 - #3] &)] Bob Hanlon ---- Vladimir <svetlana_47 at yahoo.de> 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.