Re: Plot - Filling area that is above more curves
- To: mathgroup at smc.vnet.net
- Subject: [mg97946] Re: Plot - Filling area that is above more curves
- From: Szabolcs <szhorvat at gmail.com>
- Date: Thu, 26 Mar 2009 05:22:24 -0500 (EST)
- References: <gqd1ro$nu4$1@smc.vnet.net>
On Mar 25, 12:43 pm, dragec <culino... at gmail.com> wrote:
> Is there any way to fill area that is (in the same time) above more
> curves in Plot function? So that filled area is not crossed with any
> regarded function.
>
> How to construct function from other functions that returns the
> biggest value from all functions in question?
>
You can use Max[] for that.
Plot[{Sin[x], 1/3 (1 + Sin[2 x]),
Max[Sin[x], 1/3 (1 + Sin[2 x])]}, {x, 0, 6 Pi},
Filling -> {3 -> Top}, PlotStyle -> {Red, Blue, None}]