RE: Drawing a Washer, Polar Plot Question

• To: mathgroup at smc.vnet.net
• Subject: [mg29734] RE: [mg29728] Drawing a Washer, Polar Plot Question
• From: "David Park" <djmp at earthlink.net>
• Date: Thu, 5 Jul 2001 06:08:00 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```Bob,

If you have Version 4.1 you can do it this way.

Needs["Graphics`Graphics`"]
Needs["Graphics`InequalityGraphics`"]

p1 = PolarPlot[4 Cos[t] - 2, {t, 0, 2Pi}];
p2 = InequalityPlot[1 < x^2 + y^2 < 4, {x, -2, 2},
{y, -2, 2}, Fills -> GrayLevel[0.8]];

Show[p1, p2, Frame -> True, AxesFront -> True];

If you don't have Version 4.1 you could do it using my DrawingPaper packages
this way.

Needs["Graphics`DrawingPaper`"]
Needs["Graphics`FilledDrawing`"]

Show[Graphics[
{DrawPolarR[4*Cos[t] - 2, {t, 0, 2*Pi}],
FilledDraw[{1, 2}, {t, 0, 2*Pi},
Fills -> {GrayLevel[0.7]}] /. DrawingTransform[
#2*Cos[#1] & , #2*Sin[#1] & ]}],
AspectRatio -> Automatic, PlotRange -> Automatic,
Background -> Linen, {Frame -> True}];

I drew a filled band in the theta-r plane and then used DrawingTransform to
bend it into a washer in the x-y plane.

David Park

> From: Robert B. Love [mailto:rlove at antispam.neosoft.com]
To: mathgroup at smc.vnet.net
>
>
> I have a polar plot of my data that lookes the way I want.  Now
> I want to add a grey "washer" shaped exclusion zone on top of
> the plot.  I see there is a nice Disk two dimensional graphics
> object that is almost what I want.  It draws a filled in circle
> centered on {x,y} of radius r.  What I want is some thing that
> draws a filled in circle between r1 and r2, centered on {x,y}.
> Is there some way I can do this easily?  I've tried combining two
> Disks of different colors and sizes but no luck.
>
>
>
> --
> ----------------------------------------------------------------
>  Bob Love
>  rlove at neosoft.com
> ----------------------------------------------------------------
>
>

```

• Prev by Date: Re: Should Pure Functions Require &
• Next by Date: Re: proof by induction?
• Previous by thread: Re: Drawing a Washer, Polar Plot Question
• Next by thread: Re:Drawing a Washer, Polar Plot Question