MathGroup Archive 2004

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

Search the Archive

Re: Plotting a contour plot with cylindrical co-ordinates

  • To: mathgroup at smc.vnet.net
  • Subject: [mg49497] Re: Plotting a contour plot with cylindrical co-ordinates
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Thu, 22 Jul 2004 02:45:09 -0400 (EDT)
  • Organization: Universitaet Leipzig
  • References: <cdlip2$81u$1@smc.vnet.net>
  • Reply-to: kuska at informatik.uni-leipzig.de
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

plt = ContourPlot[
    r^2*Cos[2th], {th, 0, 2Pi}, {r, 0, 4},DisplayFunction->Identity]

lines = Cases[Graphics[plt], _Line, Infinity]; 
Show[Graphics[lines /. Line[pnts_] :> 
     Line[(#1[[2]]*{Cos[#1[[1]]], Sin[#1[[1]]]} & ) /@ 
       pnts], AspectRatio -> Automatic]]

???

or 

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


Regards
  Jens



Jake wrote:
> 
> I have a set of data which corresponds to points on a circle. I have
> these values as a function of r and theta. Is there a way of plotting
> this in Mathematica? The ContourPlot function requires x and y
> co-ordinates.
> Please help if you know.
> thanks.


  • Prev by Date: Re: 3D Pascal's Triangle (Cone?)
  • Next by Date: Re: If-statement problems
  • Previous by thread: Plotting a contour plot with cylindrical co-ordinates
  • Next by thread: RE: Plotting a contour plot with cylindrical co-ordinates