Re: join
- To: mathgroup at smc.vnet.net
- Subject: [mg6290] Re: [mg6277] join
- From: Don Piele <piele at cs.uwp.edu>
- Date: Sat, 8 Mar 1997 00:26:10 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Quick solution;
f[x_]= 4 E^-x + Sin[x];
surface=ParametricPlot3D[{x,f[x] Cos[t],f[x]Sin[t]},
{x,0,Pi/2},{t,0,2 Pi},Boxed->False,PlotRange->All];
another view
Show[surface, ViewPoint->{2.7,1.6,1.2}]
This can be embelished a lot.
See Calculus&Mathematica: Integrals page 124.
D Piele
On Thu, 6 Mar 1997, RyanB wrote:
> To: mathgroup at smc.vnet.net
>
> I have a question for someone.
> How do I take a defined 2D area and revolve it around an axis or a line and
> have Mathematica draw a good picture of it? In my AP Calulus class we are
> figuring the volume of these types of problems. Thanks! Ryan Birkenholz
> --
> Check out StaticEz Emporium >>http://members.tripod.com/~Hypes_World/ryan.
> html
>
>
>