Re: Filling question
- To: mathgroup at smc.vnet.net
- Subject: [mg124460] Re: Filling question
- From: David Skulsky <edskulsky at gmail.com>
- Date: Fri, 20 Jan 2012 01:53:06 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <jf8vdp$5p3$1@smc.vnet.net>
- Reply-to: comp.soft-sys.math.mathematica at googlegroups.com
Here's one way:
Plot[{Exp[-(x - 3)^2], Exp[-(x - 5)^2],
Min[{Exp[-(x - 3)^2], Exp[-(x - 5)^2]}]}, {x, 0, 10},
Filling -> {3 -> 0}, PlotRange -> All]
David