David
Underhill – P710 #13, 15
> with(plots):
>
spacecurve( [t, cos(2*t), sin(2*t)], t=-2*Pi..2*Pi, color=blue,
axes=normal); #P710 #13
> spacecurve( [sin(t), 3,
cos(t)], t=-2*Pi..2*Pi, color=blue, axes=normal); #P710 #15M
David
Underhill – P710 #13, 15
> with(plots):
>
spacecurve( [t, cos(2*t), sin(2*t)], t=-2*Pi..2*Pi, color=blue,
axes=normal); #P710 #13
> spacecurve( [sin(t), 3,
cos(t)], t=-2*Pi..2*Pi, color=blue, axes=normal); #P710 #15M