filling
- To: mathgroup at smc.vnet.net
- Subject: [mg127030] filling
- From: Francisco Gutierrez <fgutiers2002 at yahoo.com>
- Date: Tue, 26 Jun 2012 04:45:56 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Reply-to: Francisco Gutierrez <fgutiers2002 at yahoo.com>
Dear Friends:
Filling is rather well documented. I have failed to solve an apparently simple but annoying problem.
I have the following plot:=
Needs["PlotLegends`"]
example=ListLinePlot[threevarsA, PlotStyle->{{Thick,Red},{Thick,Orange}, {Thick,Green}}, Ticks->{{{0,1976},{10,1986},{20,1996},{30,2006},{34,2009}}, Automatic},PlotLegend->{Text[Style["Ammnist=EDa",12]],Text[Style["SD-USA",12]],Text[Style[ "Polity",12]]},LegendPosition->{1.1,-0.4}, Filling->{2->{{3}, Gray}}]
threevars is this list:
{{6,4,4,0,2,2,0,2,2,2,0,2,0,0,0,0,0,0,0,2,0,0,0,0,0,0,0,0,0,0,0,2,0,0},{6,6,6,4,4,4,4,4,4,4,2,2,2,2,0,0,2,0,0,0,0,0,0,0,0,0,0,0,0,2,2,2,2,2},{8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,9,9,9,9,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7}}
Note that in the output the gray area falls below the red line (exactly by 1996).. I do not want this. I want the gray filling to fall between the green line and the maximum value of the red and orange ones --but without drawing the line of the maxima of these two. How can I manage to do this? Any help appreciated
Francisco
- Follow-Ups:
- Re: filling
- From: Kurt TeKolste <tekolste@fastmail.net>
- Re: filling