MathGroup Archive 2011

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Display BarChart ticks in AccountingForm?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg121000] Re: Display BarChart ticks in AccountingForm?
  • From: "Chris Degnen" <degnen at cwgsy.net>
  • Date: Sun, 21 Aug 2011 05:32:00 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • References: <j2o1ov$4tv$1@smc.vnet.net>

You can use the accounting form as tick labels.  In tick options:
http://reference.wolfram.com/mathematica/ref/Ticks.html

{{x1,label1},{x2,label2},...}   tick marks drawn with the specified labels

BarChart[{1 10^13, 2 10^13, 3 10^13}, ChartLabels -> {"a", "b", "c"}, 
Ticks -> {None, {#, AccountingForm[#, DigitBlock -> 3]} & /@ {1 10^13, 
2 10^13, 3 10^13}}]

Porscha wrote:
>
> Hello,
> 
> I have a BarChart with large y-values:
> 
> BarChart[{1 10^13, 2 10^13, 3 10^13}, ChartLabels -> {"a", "b", "c"},
>  Ticks -> {None, {1 10^13, 2 10^13, 3 10^13}}]
> 
> I do not want the y-axis tick marks to display in scientific notation.  
> How can I get the tick marks to display using AccountingForm?  The  
> following does not seem to work:
> 
> BarChart[{1 10^13, 2 10^13, 3 10^13}, ChartLabels -> {"a", "b", "c"},
>  Ticks -> {None,
>    AccountingForm[#, DigitBlock -> 3] & /@ {1 10^13, 2 10^13,
>      3 10^13}}]
> 
> Thanks in advance,
> Porscha
>





  • Prev by Date: Re: Display BarChart ticks in AccountingForm?
  • Next by Date: Re: Display BarChart ticks in AccountingForm?
  • Previous by thread: Re: Display BarChart ticks in AccountingForm?
  • Next by thread: Solving coupled differential equations iteratively.