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