Section 11.7 #jh2
> tsp:=[sin(8*t),cos(t)*(3+cos(8*t)),sin(t)*(3+cos(8*t))];
> tubeplot(tsp,t=0..2*Pi,radius=1/3,scaling=constrained, numpoints=100,axes=frame,labels=['x','y','z'],orientation=[40,75]);
>