Re: Filled Polar plots
- To: mathgroup at smc.vnet.net
- Subject: [mg85124] Re: [mg85089] Filled Polar plots
- From: "Julio de la Yncera" <ynceraj at gmail.com>
- Date: Wed, 30 Jan 2008 05:55:30 -0500 (EST)
- References: <200801280825.DAA21414@smc.vnet.net>
see example of PolarPlot in the Wolfram demos at http://demonstrations.wolfram.com/SuperellipseShapes/ that example in particular is about superellipse shapes Best Regards On Jan 28, 2008 3:25 AM, Yaroslav Bulatov <yaroslavvb at gmail.com> wrote: > What is the recommended way of creating filled polar plots? (assuming > it forms a closed non-intersecting curve) > > I'm looking to create something like the image on > http://en.wikipedia.org/wiki/Superformula, > but PolarPlot doesn't seem to have Filling options > > formula[m_, n1_, n2_, n3_] = > Function[{x}, (Cos[(m x)/4]^n2 + Sin[(m x)/4]^n3)^(-1/n1)]; > vals = {{3, 5, 18, 18}, {2, 1, 4, 8}, {3, 3, 14, 2}, {7, 2, 8, 4}}; > Table[PolarPlot[(formula @@ v)[x], {x, -Pi, Pi}, PlotRange -> All, > Axes -> None], {v, vals}] // GraphicsColumn > >
- References:
- Filled Polar plots
- From: Yaroslav Bulatov <yaroslavvb@gmail.com>
- Filled Polar plots