       Re: RevolutionPlot3D: Specifying the axis of rotation

• To: mathgroup at smc.vnet.net
• Subject: [mg105320] Re: [mg105306] RevolutionPlot3D: Specifying the axis of rotation
• From: Bob Hanlon <hanlonr at cox.net>
• Date: Sat, 28 Nov 2009 01:04:51 -0500 (EST)

```f[x_] := x^2

RevolutionPlot3D[{f[x]}, {x, 0, 2},
AxesLabel -> {x, z, y}]

RevolutionPlot3D[{f[x], x}, {x, 0, 2},
AxesLabel -> {y, z, x},
BoxRatios -> {1, 1, .5}]

f2[X_] := Sin[x]

RevolutionPlot3D[{f2[x]}, {x, 0, 2 Pi},
AxesLabel -> {x, z, y}]

RevolutionPlot3D[{f2[x], x}, {x, 0, 2 Pi},
AxesLabel -> {y, z, x},
BoxRatios -> {1, 1, Pi}]

Bob Hanlon

---- davef <davidfrick2003 at yahoo.com> wrote:

=============
When I plot y=x^2 as...

f[x_] := x^2
Plot[f[x], {x, 0, 2}]
RevolutionPlot3D[{f[x]}, {x, 0, 2}, AxesLabel -> {x, z, y}]

... I get the function rotated about the y-axis (i.e., a parabola).

But what If I want to rotate the function about the x-axis so I get a
funnel-shaped graphic?

Is there an easy way to do this?

I can plot the function in terms of  y (x=y^1/2) and get the funnel
but it would easier to just specify the axis of rotation.

Can this be done?

```

• Prev by Date: Re: How to make {f,g}[a,b,c] to become
• Next by Date: Re: How to make {f,g}[a,b,c] to become
• Previous by thread: Re: RevolutionPlot3D: Specifying the axis of rotation
• Next by thread: Re: RevolutionPlot3D: Specifying the axis of rotation