options = {Mesh -> None, Boxed -> False, Axes -> True,  AxesOrigin -> {0, 0, 0}, 
       PlotStyle -> Directive[Opacity[.6], Specularity[White, 20]], ImageSize -> 500};
    SphericalPlot3D[{1, 2, 3}, {t, 0, Pi}, {p , 0, 3 Pi/2},  Evaluate@options]

![enter image description here][1]


  [1]: https://i.sstatic.net/HEZtz.png

or

    ParametricPlot3D[
      Evaluate@Through[{1 # &, 2 # &, 3 # &}[{Cos[u] Sin[v], Sin[u] Sin[v], Cos[v]}]], 
      {v, 0, Pi}, {u, 0, 2 Pi}, 
      Evaluate@options, RegionFunction -> Function[{x, y}, x y > 0 || y > 0]]