Multiple surface plots
- To: mathgroup at smc.vnet.net
- Subject: [mg41408] Multiple surface plots
- From: "Narasimham G.L." <google.news.invalid at web2news.net>
- Date: Sun, 18 May 2003 05:03:04 -0400 (EDT)
- Reply-to: "Narasimham G.L." <mathmnno+-8s3ppa9mma18 at hotmail.com>
- Sender: owner-wri-mathgroup at wolfram.com
x= w Cos[u] Cos[v];y= w Cos[u] Sin[v];z= - w Sin[u];
ParametricPlot3D[ {x,y,z},{u,0,Pi/2},{v,0,2 Pi},{w,.5,1,.1}];
? WANT TO SEE ALL TRANSLUCENT SURFACES WITH SUCH THIRD PARAMETER
SUBROUTINE ( NO SUCH SUBROUTINE/COMMAND IN MATHEMATICA)?
x= w Cos[u] Cos[v];y= w Cos[u] Sin[v];z=- w Sin[u];
Table[ParametricPlot3D[ {x,y,z},{u,0,Pi/2},{v,0,2 Pi},
PlotRange -> {{-1, 1}, {-1, 1}, {-1, 1}},
BoxRatios->{2,2,1}],{w,.5,1,.1}]; ? ANIMATION IN W?
? OR ELSE WANT TO AVOID CLEAR SCREEN DURING W
INCREMENTED ANIMATION WITHIN ONE CYCLE?
-------
Is it possible to get several plots or avoid clear screen?
It may be possible to Show[ w1,w2,..] but, can it be avoided for a
--
Posted via http://web2news.com
To contact in private, remove nno+-8s3ppa9mm