Mark M's Cool Collection of Space Curves:
Koosh Ball:

"Koosh Ball" was produced using the following Maple
commands:
> x:=(1+cos(16*t))*cos(t);
> y:=(1+cos(16*t))*sin(t);
> z:=(1+cos(16*t))*t/10;
x := (1 + cos(16 t)) cos(t)
y := (1 + cos(16 t)) sin(t)
z := 1/10 (1 + cos(16 t)) t
> with(plots):
> spacecurve([x,y,z],t=0..4*Pi,numpoints=1000,
> axes=normal,scaling='CONSTRAINED',thickness=2);
Bow Tie:

"Bow Tie" was produced using the following Maple
commands:
> x:=(8+cos(8*t))*cos(2*t);
> y:=(2+cos(16*t))*sin(2*t);
> z:=cos(2*t)*t/4;
x := (8 + cos(8 t)) cos(2 t)
y := (2 + cos(16 t)) sin(2 t)
z := 1/4 cos(2 t) t
> with(plots):
> spacecurve([x,y,z],t=0..16*Pi,numpoints=2000,
> axes='NORMAL',scaling='CONSTRAINED');
Spaghetti:

"Spaghetti" was produced using the following Maple
commands:
> x:=(8+cos(8*t))*cos(2*t)+t/4;
> y:=(2+cos(16*t))*sin(2*t)+t/4;
> z:=cos(2*t)*t^2/40;
x := (8 + cos(8 t)) cos(2 t) + 1/4 t
y := (2 + cos(16 t)) sin(2 t) + 1/4 t
2
z := 1/40 cos(2 t) t
> spacecurve([x,y,z],t=0..8*Pi,numpoints=2000,
> axes='NORMAL',scaling='CONSTRAINED',
> thickness=2,orientation=[125,55]);
SFU /
Math & Stats /
~hebron /
math252 /
assignments /
sol03 /
studentcurves /
mark.m.html
Revised 11 Feburary 1999 by
John Hebron.