MathGroup Archive 2004

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

Search the Archive

Re: How to plot the surface of revolution graphics

  • To: mathgroup at smc.vnet.net
  • Subject: [mg49215] Re: How to plot the surface of revolution graphics
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Thu, 8 Jul 2004 02:50:48 -0400 (EDT)
  • Organization: Universitaet Leipzig
  • References: <ccg4la$osp$1@smc.vnet.net>
  • Reply-to: kuska at informatik.uni-leipzig.de
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

something like:

<< NumericalMath`SplineFit`

points = {{2, 2}, {6, 6}, {7, 5}, {3, 1}};

ParametricPlot3D[
  (tmp = spline[u]; {tmp[[1]], t, tmp[[2]]}), {t, 0., 4}, {u, 0, 4}, 
  Compiled -> False]

Regards
  Jens

CYSTERNA++ wrote:
> 
> I would like to make graphics with many surfaces. All surfaces are surfaces
> of revolution. They are created through rotate specified countur about
> certain line. I cannot make these graphics.
> I have rectangle which is represented through 4 points which have following
> coordinates : (2,2), (6,6), (7,5), 3,1). This rectangle is rotated about
> line y(x) = x and is created cylindrical surface. How to create graph with
> this surface. I know this is a simple problem and I can used
> ParametricPlot3D[] function or another but in the real I have counturs more
> complicated than rectangle and I would like use specified function to make
> graph surface of revolution.
> 
> Thanks for all
> 
> --
> Regards
> 
> CYSTERNA++


  • Prev by Date: Re: Differential Equation with Random Noise Input
  • Next by Date: Re: Differential Equation with Random Noise Input
  • Previous by thread: How to plot the surface of revolution graphics
  • Next by thread: Re: How to plot the surface of revolution graphics