Greg J's Race Track:

This space curve was produced using the following Maple commands:

> rho:=1+1/2*cos(t/10);
> x:=2*rho*sin(t);
> y:=2*rho*sin(2*t);
> z:=2*rho*cos(t);

                      rho := 1 + 1/2 cos(1/10 t)


                 x := 2 (1 + 1/2 cos(1/10 t)) sin(t)


                y := 2 (1 + 1/2 cos(1/10 t)) sin(2 t)


                 z := 2 (1 + 1/2 cos(1/10 t)) cos(t)

> with(plots):
> spacecurve([x,y,z],t=0..8*Pi,numpoints=1000,
>   axes='NORMAL',thickness=2,orientation=[100,50]);