RE: how fill PolarPlot?
- To: mathgroup at smc.vnet.net
- Subject: [mg84438] RE: [mg84420] how fill PolarPlot?
- From: "Jaccard Florian" <Florian.Jaccard at he-arc.ch>
- Date: Mon, 24 Dec 2007 04:47:24 -0500 (EST)
- References: <200712230934.EAA03990@smc.vnet.net>
Hello Murray,
I would do it like that :
Show[{des = PolarPlot[Cos[2*theta], {theta, 0, 2*Pi}],
des /. Line[a_] -> {Yellow, Polygon[a]}, des}]
I'm convinced it is a very simple way to fill PolarPlot.
But I agree it would be a good option to add to PolarPlot!
Merry Christmas and a happy new year wishes you
Florian Jaccard
-----Message d'origine-----
De=A0: Murray Eisenberg [mailto:murray at math.umass.edu]
Envoy=E9=A0: dimanche, 23. d=E9cembre 2007 10:35
=C0=A0: mathgroup at smc.vnet.net
Objet=A0: [mg84420] how fill PolarPlot?
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.
(Perhaps because of an incompatibility of a Prolog with cartesian
coordinates inside a polar coordinate plot??)
--
Murray Eisenberg murray at math.umass.edu
Mathematics & Statistics Dept.
Lederle Graduate Research Tower phone 413 549-1020 (H)
University of Massachusetts 413 545-2859 (W)
710 North Pleasant Street fax 413 545-1801
Amherst, MA 01003-9305
- References:
- how fill PolarPlot?
- From: Murray Eisenberg <murray@math.umass.edu>
- how fill PolarPlot?