Andy's Wire Rake:

This space curve was produced using the following Maple commands:

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


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


                          z := 1/2 sin(12 t)

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

SFU / Math & Stats / ~hebron / math252 / assignments / sol03 / studentcurves / andy.html

Revised 11 Feburary 1999 by John Hebron.