Re: Bar Chart lablels
- To: mathgroup at smc.vnet.net
- Subject: [mg59733] Re: [mg59715] Bar Chart lablels
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Fri, 19 Aug 2005 04:31:57 -0400 (EDT)
- Reply-to: hanlonr at cox.net
- Sender: owner-wri-mathgroup at wolfram.com
Needs["Graphics`"]; With[{n = 500, w = 500, h = 500, del = 25}, BarChart[Table[Random[], {n}], BarOrientation -> Horizontal, ImageSize -> {w, h}, AspectRatio -> h/w, Ticks -> {Automatic, Range[del, n, del]}]]; Bob Hanlon > > From: Steve Gray <stevebg at adelphia.net> To: mathgroup at smc.vnet.net > Date: 2005/08/18 Thu AM 12:17:19 EDT > Subject: [mg59733] [mg59715] Bar Chart lablels > > 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: > > 1. Make the three digits in each label appear one above the other instead of horizontally adjacent? > 2. Make one-fifth (say) of the labels appear and suppress the rest? > 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? > > None of the books I have cover this. Thank you for any tips. The group's answers have been > extremely valuable in the past! > > Steve Gray > >