Won's Weeping Willow:

This space curve was produced using the following Maple commands:

> x:=10*r*sin(t)*ln(t);
> y:=10*r*cos(t)*exp(1/t);
> z:=t/10*sin(t)*cos(t);
> r:=sin(t/10);

                        x := 10 r sin(t) ln(t)


                      y := 10 r cos(t) exp(1/t)


                      z := 1/10 t sin(t) cos(t)


                           r := sin(1/10 t)

> with(plots):
> spacecurve([x,y,z],t=0..1000,numpoints=4000,
>   axes='NORMAL',orientation=[45,75]);