Re: shade area between vertical lines

*To*: mathgroup at smc.vnet.net*Subject*: [mg46944] Re: shade area between vertical lines*From*: elmanthira <my_name at microsoftsnetwork.com>*Date*: Tue, 16 Mar 2004 19:55:10 -0500 (EST)*References*: <c33d6f$fs3$1@smc.vnet.net> <c36b18$s0u$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Thanks much. I think I'm going to use the inequality dealie. Hartmut Wolf's suggestion gave me the error "x2 is not a machine-size real number at x =" a whole bunch of times, but had the lovely property of using the filled plot function that I have a bit of familiarity with. Now I need to figure out how to make dashed lines (I'm assuming it's going to be very similar.) An ancillary question brought up by all three suggestions I saw today: What does Prolog mean/do? I read the help file's description of it, but my ignorance was unfazed. Thanks for your time. Bob Hanlon wrote: > Needs["Graphics`"]; > > Use InequalityPlot > > InequalityPlot[ > {1<x<2, 1<y<2}, > {x,0,3}, {y,0,3}, > PlotRange->{{-1,5},{-1,5}}, > Fills->Violet, > Prolog->{LightBlue, > Rectangle[{-1, 1}, {5, 2}], > Pink, > Rectangle[{1, -1}, {2, 5}], > Blue, > Line[{{-1,1}, {5,1} }], > Line[{{-1,2}, {5,2} }], > Red, > Line[{{1,-1}, {1,5} }], > Line[{{2,-1}, {2,5} }]}]; > > Or graphics primatives > > Show[Graphics[{ > LightBlue, > Rectangle[{-1, 1}, {5, 2}], > Pink, > Rectangle[{1, -1}, {2, 5}], > Violet, > Rectangle[{1, 1}, {2, 2}], > Blue, > Line[{{-1,1}, {5,1} }], > Line[{{-1,2}, {5,2} }], > Red, > Line[{{1,-1}, {1,5} }], > Line[{{2,-1}, {2,5} }]}], > Axes->True, AxesFront->True, > AspectRatio->1]; > > > Bob Hanlon > > In article <c33d6f$fs3$1 at smc.vnet.net>, elmanthira > <my_name at microsoftsnetwork.com> wrote: > > << I know that it is possible to have Mathematica generate a plot that > shows the area shaded in between the lines y=1 and y=2 with something like: > <<Graphics`FilledPlot`; > FilledPlot[{1, 2}, {x, -1, 5}, PlotRange -> {-1, 5}] > > This makes a lovely display of the open set in R^2 {(x,y):1<y<2}. > > I wish to intersect this with the set in R^2 {(x,y):1<x<2}. > > First, how can I make it graph the four lines on the same plot, AND > shade in rectangle formed by the overlapping bars. > > Ideally, I'd want the bars to be shaded in with the rectangle formed to > have some sort of crosshatch pattern, or other "darker" area. It seems > that Mathematica automatically does some color differentiation for > different regions, and that would be adequate, I hope.