Re: Plotting polar graph
- To: mathgroup at smc.vnet.net
- Subject: [mg92377] Re: Plotting polar graph
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Tue, 30 Sep 2008 07:33:29 -0400 (EDT)
- References: <gbqctd$e9h$1@smc.vnet.net>
Hi,
en = DensityPlot[Sqrt[r]*Sin[theta/2], {r, 0, 10}, {theta, -Pi, Pi},
ColorFunction -> (ColorData["Rainbow"][#] &), PlotPoints -> 36];
Show[den /.
GraphicsComplex[pnts_, data__] :>
GraphicsComplex[#[[1]]*{Cos[#[[2]]], Sin[#[[2]]]} & /@ pnts, data],
PlotRange -> All]
??
Regards
Jens
mikewinifred wrote:
> hi all ... i wanna plot a function
>
> Sqrt[r]*Sin[theta/2]
>
> in polar co-ordinates that will givva density plot like the one i gave the link below, in fact that is the plot for the same function mentioned above.Kindly someone tell me how to do it in mathematica ??
>
> http://i37.tinypic.com/2na2vef.jpg
>
> thx
> mike
>
