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}]