Surfaces as Creativity Reflections 2

Table[SphericalPlot3D[Log[2-Sin[T*\[Theta]]]\[Phi],{\[Theta],0,2Pi},{\[Phi],0,2 Pi},
Boxed->False,Axes->False,PlotRange->All,PlotPoints->30,
NormalsFunction->None,PlotStyle->Opacity[.9],Mesh -> None,
ImageSize->500,ColorFunction ->Function[{x,y,z,\[Theta],\[Phi],r},
ColorData["CoffeeTones"][RandomReal[{0,1}]]]],{T,{1,11}}]