Re: barchart
- To: mathgroup at smc.vnet.net
- Subject: [mg129829] Re: barchart
- From: Helen Read <readhpr at gmail.com>
- Date: Sun, 17 Feb 2013 04:09:53 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-newout@smc.vnet.net
- Delivered-to: mathgroup-newsend@smc.vnet.net
- References: <kfn7o2$qal$1@smc.vnet.net>
list1 = RandomInteger[{1, 25}, 5];
list2 = RandomInteger[{8, 15}, 8];
BarChart[{list1, list2}, Epilog -> {Red, Line[{{0, 10}, {15, 10}}]}]
plot1 = BarChart[{list1, list2}];
plot2 = Plot[10, {x, 0, 14}, PlotStyle -> Red];
Show[{plot1, plot2}]
Helen Read
University of Vermont
On 2/16/2013 1:08 AM, Francisco Gutierrez wrote:
> Dear Group:
>
> I have not managed to combine BarChart with a line.
>
> The simple problem is the following. I have a labeled BarChart (that
> is, I use the ChartLegends options) , and I want to draw a horizontal
> line, to highlight the separation say between units below and above 10.
> But I do not see how can this be done within BarChart, and I haven't
> been able to combine BarChart with the line using Show or Graphics.
>
> Can somebody help me?
>
> Francisco
>