Re: Bar Chart lablels
- To: mathgroup at smc.vnet.net
- Subject: [mg59764] Re: [mg59715] Bar Chart lablels
- From: ggroup at sarj.ca
- Date: Sat, 20 Aug 2005 03:14:00 -0400 (EDT)
- References: <200508180417.AAA08617@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
On Thu, 18 Aug 2005 00:17:19 -0400 (EDT), Steve Gray wrote
> I have a BarChart with several hundred bars. The problem is that the
> three-digit numeric labels on the X-axis are so close together that
> they overlap and are unreadable. Is there a way to:
<snip>
> 2. Make one-fifth (say) of the labels appear and suppress the rest?
You don't mention how you create your labels, but presumably you have a list.
I'm assuming you've stored that list in "barlabel"
<<Graphics`Graphics`
data = Table[10i, {i, 5}];
barlabel = Table[i/1000., {i, 5}];
BarChart[data,
BarLabels -> (Table[If[Mod[i, 5] == 0, barlabel[[i]], ""], {i,
Length[barlabel]}])]
> 3. Turn the whole thing 90 degrees CW so the bars stick out to the
> right, in which case the labels would be horizontal and not overlap?
BarChart[data, BarOrientation -> Horizontal, BarLabels -> barlabel]
More options are described in the documentation for the Graphics`Graphics` add-
on package: <http://documents.wolfram.com/mathematica/Add-
onsLinks/StandardPackages/Graphics/Graphics.html>.
- References:
- Bar Chart lablels
- From: Steve Gray <stevebg@adelphia.net>
- Bar Chart lablels