Services & Resources / Wolfram Forums
MathGroup Archive
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1997

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: join

  • To: mathgroup at
  • Subject: [mg6290] Re: [mg6277] join
  • From: Don Piele <piele at>
  • Date: Sat, 8 Mar 1997 00:26:10 -0500 (EST)
  • Sender: owner-wri-mathgroup at

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
> 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 >>
> html

  • Prev by Date: Communication
  • Next by Date: Re: Creating an Attribute AntiSymmetric ?!?!?!
  • Previous by thread: Communication
  • Next by thread: Re: join