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 2000

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

Search the Archive

Re: Volumes

  • To: mathgroup at
  • Subject: [mg26238] Re: [mg26219] Volumes
  • From: Tomas Garza <tgarza01 at>
  • Date: Wed, 6 Dec 2000 02:16:22 -0500 (EST)
  • Sender: owner-wri-mathgroup at

Use SurfaceOfRevolution. E.g.

f[x_] := x^3;

This is the plot of your curve in 2D:

Plot[f[x], {x, -5, 5}, PlotRange -> {{0, 5}, {0, 8}}];

Now you call the Add-On and produce the plot of the volume:

<< Graphics`SurfaceOfRevolution`
          f[x], {x, 0, 2}, Axes -> True,
  PlotRange -> {{-2, 2}, {-2, 2}, {0, 8}}]

Many embellishments are possible.

Tomas Garza
Mexico City

bobmarley4u2c at wrote:

> I have a problem like: Find the volume of the solid obtained by
> rotating the region bounded by y=x^3, y=8 and x=0 about the y 
-axis. I
> know how to solve this on paper, but the real problem is how can I
> visualize this graph in 3d? My book does a good job of showing it, how
> can I produce pictures like that with Mathematica?

  • Prev by Date: Easy way to simplify expr to a+bi?
  • Next by Date: Re: using the result from previous calculation
  • Previous by thread: Volumes
  • Next by thread: Integrating Conditionals/piecewise cont. functions