MathGroup Archive 2001

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

Search the Archive

Re: Cylidrical Coordinates Plot

  • To: mathgroup at smc.vnet.net
  • Subject: [mg27885] Re: Cylidrical Coordinates Plot
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Fri, 23 Mar 2001 04:31:05 -0500 (EST)
  • Organization: Universitaet Leipzig
  • References: <99chfl$8bg@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,


for 3d plot your should look at the

Graphics`ParametricPlot3D` package

There is an CylindricalPlot3D[] function.

you can't.


For DensityPlot[] and ContourPlot[], you can't.

But you can try

DensityPlot[f[Sqrt[x^2+y^2],ArcTan[x,y]],{x,-1,1},{y,-1,1}]

or

f[r_, th_] := r^2*Cos[2*th]


plt = ContourPlot[f[r, th], {r, 0, 1}, {th, 0, 2Pi}];

cp = DeleteCases[Graphics[plt], _Polygon, Infinity] /. 
    Line[pnts_] :> Line[#[[1]]*{Cos[#[[2]]], Sin[#[[2]]]} & /@ pnts];

Show[cp]

Regards
  Jens

Moranresearch at aol.com wrote:
> 
> How can I make z = f(r,theta)  contour, density and 3D plots in Mathematica?
> Thanks.


  • Prev by Date: Re: Random number generation
  • Next by Date: Re: DeleteCases
  • Previous by thread: Cylidrical Coordinates Plot
  • Next by thread: RE: Cylidrical Coordinates Plot