Re: how fill PolarPlot?

• To: mathgroup at smc.vnet.net
• Subject: [mg84433] Re: how fill PolarPlot?
• From: Helen Read <hpr at together.net>
• Date: Mon, 24 Dec 2007 04:44:45 -0500 (EST)
• References: <fkla2t\$3sh\$1@smc.vnet.net>

```Murray Eisenberg wrote:
> I Mathematica 6 I have a PolarPlot, e.g., a 4-leaved rose:
>
>    PolarPlot[Cos[2 theta], {theta, 0, 2 Pi}]
>
> How can I fill the inside -- or, what I really want, just the leaf in
> the right half-plane -- with some color?
>
> I note that Filling does not seem to be an option for PolarPlot (or for
> what would be almost as good, ParametricPlot).
>
> I tried including the following (obtained by converting from :
>
>    Prolog->RegionPlot[(x^2 + y^2)^(3/2) <= x^2-y^2, {x,-0.02,1},{y,-1,1},
>        Frame->False, AspectRatio->Automatic]
>
> However, that led to a mysterious error message:
>
>    \$Aborted is not a Graphics primitive or directive.

I got the even more mysterious error "Graphics is not a Graphics
primitive or directive".

> (Perhaps because of an incompatibility of a Prolog with cartesian
> coordinates inside a polar coordinate plot??)

Don't know, but in any case the following works.

Show[PolarPlot[Cos[2 theta], {theta, 0, 2 Pi}],
RegionPlot[(x^2 + y^2)^(3/2) <= x^2 - y^2, {x, -0.02, 1}, {y, -1, 1},
Frame -> False, AspectRatio -> Automatic]]

--