Re: BarChart and Ticks

*To*: mathgroup at smc.vnet.net*Subject*: [mg101011] Re: [mg100992] BarChart and Ticks*From*: jaebum at wolfram.com*Date*: Sat, 20 Jun 2009 04:02:53 -0400 (EDT)*References*: <200906200047.UAA00899@smc.vnet.net>

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

**References**:**BarChart and Ticks***From:*Don <donabc@comcast.net>