RE: FilledPlot with Implicit Functions?

*To*: mathgroup at smc.vnet.net*Subject*: [mg45811] RE: [mg45784] FilledPlot with Implicit Functions?*From*: "David Park" <djmp at earthlink.net>*Date*: Mon, 26 Jan 2004 01:53:15 -0500 (EST)*Sender*: owner-wri-mathgroup at wolfram.com

In this case you can use the InequalityGraphics package. Needs["Graphics`InequalityGraphics`"] InequalityPlot[1 < x^2 + y^2 < 2, {x, -3, 3}, {y, -3, 3}]; Here is a second, slightly more interesting example. Needs["Graphics`Colors`"] InequalityPlot[1 + (1/2)*(y/(x^2 + y^2)) < 2*(x^2 + y^2) < 4, {x, -3, 3}, {y, -3, 3}, Fills -> Eggshell, BoundaryStyle -> {Olive}, Background -> Burlywood]; David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ From: e.t. [mailto:e-t at gmx.li] To: mathgroup at smc.vnet.net Hi, how can fill the range between the to circles? FilledPlot will not work with implicit functions. thx, Oliver Needs["Graphics`ImplicitPlot`"]; f1 := x^2 + y^2 == 2; f2 := x^2 + y^2 == 1; ImplicitPlot[{f1, f2}, {x, -3, 3}, AxesLabel -> {"x", "y"}, PlotStyle -> {{}, Dashing[{0.02}]}];