Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1997
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*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 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
> 
> 
> 


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