ParametricPlot3D[sin(u) sin(v)+0.05 tan(20 v),cos(u) sin(v)+0.05 tan(20 u),cos(v)]