Rhonda's Wriggles Around a Circle:

This space curve was produced using the following Maple commands:

> x:=t/13/Pi+1/3*sin(t^2);
> y:=(1+1/13*sin(t^2))*cos(t);
> z:=(1+1/13*cos(t^2))*sin(t);

                                t              2
                     x := 1/13 ---- + 1/3 sin(t )
                                Pi


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


                                        2
                    z := (1 + 1/13 cos(t )) sin(t)

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