| Author |
Comment/Response |
Michael
|
09/18/12 9:17pm
This should do it:
Show[
ParametricPlot3D[r[t], {t, 0, 10 \[Pi]}],
ParametricPlot3D[w[s], {s, -2.5, 3}],
ParametricPlot3D[b[u, v], {u, 0, 2Pi}, {v, -Pi/2, Pi/2}]
]
(Show[..] can be used to combine plots or change options.)
URL: , |
|