Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

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

Search the Archive

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?




  • 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