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
>
>