ParametricPlot3D[
  {Cos[u]*Sin[v],Sin[u]*Sin[v],Cos[v]+Log[Tan[v/2]]+0.2*u},
  {u,0,4*Pi},{v,1/20,1},
  Boxed->False,Axes->False,ViewVertical->{-1,0,0},
  Background->RGBColor[1.0,1.0,0.9]];
