Re: Graphics question
- To: mathgroup at smc.vnet.net
- Subject: [mg51710] Re: [mg51705] Graphics question
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Sat, 30 Oct 2004 03:47:53 -0400 (EDT)
- Reply-to: hanlonr at cox.net
- Sender: owner-wri-mathgroup at wolfram.com
Needs["Graphics`FilledPlot`"];
FilledPlot[
{7-3x,-5x,-2x},
{x,-1,5},
Fills->{GrayLevel[1], GrayLevel[.9]}];
or
FilledPlot[
{7-3x,-5x,-2x},
{x,-1,5},
Fills->{{{2,3},GrayLevel[.9]}}];
Bob Hanlon
>
> From: "Alan" <info at optioncity.REMOVETHIS.net>
To: mathgroup at smc.vnet.net
> Date: 2004/10/29 Fri AM 03:40:37 EDT
> To: mathgroup at smc.vnet.net
> Subject: [mg51710] [mg51705] Graphics question
>
> I have 3 Plots over the same x-axis range: p1, p2, p3
> Each plot is of a well-behaved monotonically decreasing function.
>
> The result of Show[p1,p2,p3] is three curves which do not intersect,
> with the exception except that the lower two curves intersect at x=0.
>
> I would like to fill in the region between the
> two lower curves with a Gray background.
>
> How can I accomplish this?
>
> regards,
> alan
>
>
>
>
>