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)
- Reply-to: hanlonr at cox.net
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?