MathGroup Archive 1999

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

Search the Archive

Re: Areas via Rotation

  • To: mathgroup at smc.vnet.net
  • Subject: [mg17080] Re: Areas via Rotation
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Fri, 23 Apr 1999 02:32:15 -0400
  • Organization: Universitaet Leipzig
  • References: <7fh2l5$h24@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Hi Robert,


something like that:

Needs["Graphics`SurfaceOfRevolution`"]


Table[SurfaceOfRevolution[u^2,{u,0,1},{t,0,alpha},
    PlotRange->{{-1,1},{-1,1},{0,1}}],{alpha,Pi/4,2Pi,Pi/4}]


Close he created cells, select the cell bracket and use the Cell |
Animate Selected Graphics
from the menu.

Regards
  Jens

Robert Hoopes wrote:
> 
> Hi, I am trying to construct a movie that demonstrates how the rotation of a
> parabola can form a 3D solid.
> 
> Can someone explain how to do this ?
> 
> Sincerely Robert Hoopes


  • Prev by Date: Re: Infinite precision
  • Next by Date: using WorkingPrecision and AccuracyGoal to control the error of estim.
  • Previous by thread: Re: Areas via Rotation
  • Next by thread: Re: Areas via Rotation