ParametricPlot[{(1-t)cos(6Pi*t),(1-t)sin(6Pi*t),t},{t, 0, 1}]