Ann's Tornado:

This space curve was produced using the following Maple commands:

> x:=(1+6/15*cos(12*t))*(cos(1/10*t));
> y:=(log(1+6/15*(sin(12*t)))*(cos(1/50*t)));
> z:=1/20*t*Pi+1/500*sin(sin(24*t));

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


                y := ln(1 + 2/5 sin(12 t)) cos(1/50 t)


                z := 1/20 t Pi + 1/500 sin(sin(24 t))

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

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

Revised 11 Feburary 1999 by John Hebron.