One way is to specify coordinates in Ticks:
System`BarChart[Transpose[{{1, 2, 3}, {2, 3, 4}}],
Ticks -> {Transpose at {Table[.5 + 2.3 i, {i, 0, 2}], {1, 2, 3}},
Automatic}]
System`BarChart[Transpose@{{1, 2, 3, 4, 5}, {2, 3, 4, 5, 6}},
Ticks -> {Transpose at {Table[.5 + 4.6 i, {i, 0, 2}], {1, 3, 5}},
Automatic}]
Note that default spacing is .1 between bars in group and .2 between groups.
- Jay
> I am trying to make the Version 7 BarChart function have the same Ticks
> capability as what was so easily done in Version 6 using the Ticks option.
> Examples of what worked using the Ticks option in Version 6
>
> Example: (1)
>
> << "BarCharts`"
> BarCharts`BarChart[{{1, 2, 3}, {2, 3, 4}}, Ticks -> {{1, 2, 3},
> Automatic}]
>
> Example: (2) Sometimes it is necessary to skip priniting every other
> number on the X-axis
> when the X-axis becomes too clutered with numbers.
>
> << "BarCharts`"
> BarCharts`BarChart[{{1, 2, 3,4,5}, {2, 3, 4,5,6}}, Ticks -> {{1, 3,5},
> Automatic}]
>
>
> The Ticks option does not work in Version 7:
>
> System`BarChart[Transpose[{{1, 2, 3}, {2, 3, 4}}], Ticks -> {{1, 2, 3},
> Automatic}]
>
> (Note that one has to Transpose the data to get the same grouping in
> the bar chart as Version 6, but this is easily done.)
>
> Is there a way to get the same Tick marks as in Examples (1) and (2)
> above
> uisng the Version 7 BarChart function with its options?
>
> Thank you in advance.
>