> x:=(1+sin(25*t))*cos(t); > y:=(1+cos(25*t))*sin(t); > z:=1+cos(25*t); x := (1 + sin(25 t)) cos(t) y := (1 + cos(25 t)) sin(t) z := 1 + cos(25 t) > with(plots): > spacecurve([x,y,z],t=0..2*Pi,numpoints=1000, > thickness=2,axes='FRAMED',orientation=[45,10]);