Re: Filling question
- To: mathgroup at smc.vnet.net
- Subject: [mg124480] Re: Filling question
- From: Alexei Boulbitch <Alexei.Boulbitch at iee.lu>
- Date: Sat, 21 Jan 2012 05:15:13 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
Hi, Gabriel,
Try this and play with the PlotStyle:
Show[{
Plot[{Exp[-(x - 3)^2], Exp[-(x - 5)^2]}, {x, 0, 10}],
RegionPlot[
y <= Exp[-(x - 5)^2] && x >= 2.5 && x < 4, {x, 0, 10}, {y, 0, 1},
PlotPoints -> 180, PlotStyle -> LightRed],
RegionPlot[
y <= Exp[-(x - 3)^2] && x >= 4 && x < 5.5, {x, 0, 10}, {y, 0, 1},
PlotPoints -> 180, PlotStyle -> LightBlue]
}]
Here is a silly question: How to fill the region between two overlapping
curves? e.g., the region near x=4 in
Plot[{Exp[-(x - 3)^2], Exp[-(x - 5)^2]}, {x, 0, 10}
Thanks in advance,
Gabriel Landi
Alexei BOULBITCH, Dr., habil.
IEE S.A.
ZAE Weiergewan,
11, rue Edmond Reuter,
L-5326 Contern, LUXEMBOURG
Office phone : +352-2454-2566
Office fax: +352-2454-3566
mobile phone: +49 151 52 40 66 44
e-mail: alexei.boulbitch at iee.lu<mailto:alexei.boulbitch at iee.lu>