ParametricPlot[{(1-1/t)cos(t),(1-1/t)sin(t)},{t,1,1000}]