ParametricPlot3D[{Cos[t], -Cos[t], Sin[t]}, {t, 0, 4pi}]