Another flower

Another flower without comment. 🙂 function source is here.

\documentclass[border=5pt]{standalone}
\usepackage{pgfplots}
\pgfplotsset{compat=1.8}
\renewcommand*{\r}{(sin(4*u)^3 + cos(2*u)^3 + sin(6*v)^2 + cos(6*v)^4)}
\begin{document}
\begin{tikzpicture}
  \begin{axis}[
      view = {120}{310},
      hide axis,
      colormap = {flower}{
        color(0cm)  = (yellow);       color(4cm)  = (yellow!70!red);
        color(8cm)  = (red!60!black); color(12cm) = (red!90!black); 
        color(16cm) = (green);        color(20cm) = (green!20!black)},
    ]
    \addplot3[
      surf,
      z buffer = sort,  point meta = u,
      domain   = 0:180, domain y   = 0:360,
      samples  = 40,    samples y  = 40,% take 80 and 80 and LuaLaTeX for the image below
      variable = \u,    variable y = \v      
    ] 
    ( { \r*sin(u)*cos(v) },
      { \r*cos(u) },
      { \r*sin(u)*sin(v) } );
  \end{axis}
\end{tikzpicture}
\end{document}