
> x:=(1+4*sin(t^2))*cos(t);
> y:=(1+4*sin(t^2))*sin(t);
> z:=3*t;
2
x := (1 + 4 sin(t )) cos(t)
2
y := (1 + 4 sin(t )) sin(t)
z := 3 t
> with(plots):
> spacecurve([x,y,z],t=0..6*Pi,numpoints=4000,axes='NORMAL',
> scaling='CONSTRAINED',orientation=[45,75]);