MuPAD
Pro Computing Essentials - Examples
Example 7.14 - Plotting curve in 3D
Let's create a quick plot of a curve in 3D. For this purpose, we will take the parametric equation:

export(plot, Curve3d);
h:=(x,y,z)->[abs(sin(x)),abs(sin(y)),abs(sin(z))]:
c1 := Curve3d(
[sin(t)*cos(7*t),sin(t)*sin(7*t),cos(t)], t=0..2*PI,
Grid = [200],
LineWidth = 50,
Color=[Function, h]
):
plot(c1,
Scaling=Constrained,
BackGround=[0.84,0.85,1]
)
|