> x:=(1+1/10*sin(Pi*t))*cos(t)-sin(t); > y:=(1+1/10*cos(12*t))*sin(t); > z:=t/4/Pi; x := (1 + 1/10 sin(Pi t)) cos(t) - sin(t) y := (1 + 1/10 cos(12 t)) sin(t) t z := 1/4 ---- Pi > with(plots): > spacecurve([x,y,z],t=0..8*Pi,numpoints=1000, > axes='NORMAL',scaling='CONSTRAINED', > thickness=2,orientation=[45,75]);