Re: BarChart Bug?
- To: mathgroup at smc.vnet.net
- Subject: [mg23606] Re: BarChart Bug?
- From: "Allan Hayes" <hay at haystack.demon.co.uk>
- Date: Wed, 24 May 2000 02:16:06 -0400 (EDT)
- References: <8g9nhd$mle@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Bjorn,
If we do not specify the value of the option PlotRange then Mathematica
calculates it to include what it considers significant. As you found, the
automatic calculation is not always what we need.
In your example the small values in the list "probs" cause the cut off at
.35. I find that if replace probs with probs/2 then the cut off is at
0.25625.
Instead of using PlotRange->{0,1} you might like to try PlotRange ->All.
Allan
---------------------
Allan Hayes
Mathematica Training and Consulting
Leicester UK
www.haystack.demon.co.uk
hay at haystack.demon.co.uk
Voice: +44 (0)116 271 4198
Fax: +44 (0)870 164 0565
"Bjorn Leonardz" <cBLZ at hhs.se> wrote in message
news:8g9nhd$mle at smc.vnet.net...
> Hallo MathGroup,
>
> I want to display probabilities and cumulative probabilities for a
discrete
> random variable (integer valued) in the same bar chart.
>
> In 'My example' (see below), the height of the vertical axis gets chopped
> at .35, so the cumprobs do not get properly graphed. When I make two
> separate charts they are both OK.
>
> At the same time the 'Simple test example' works well.
>
> New trial, this time with the option PlotRange->{0,1} added.
> Now it works.
>
> What went wrong? The Help Browser says nothing about this in the BarChart
> article. Why doesn't BarChart[] calculate the PlotRange properly in 'My
> example'?
>
> Regards,
> Bjorn Leonardz
>
> -----------------------------------------------
>
> << Graphics`Graphics`
>
> ** Simple test example
> testprobs = {.1, .2, .4, .2, .1};
> testcumprobs = {.1, .3, .7, .9, 1.};
> BarChart[testprobs, testcumprobs]
>
> ** My example
> probs = {1, 3, 6, 9, 11, 13, 14, 13, 11, 9, 6, 3, 1}/100.
> cumprobs = {1, 4, 10, 19, 30, 43, 57, 70, 81, 90, 96, 99, 100}/100.
> BarChart[probs]
> BarChart[cumprobs]
> BarChart[probs, cumprobs]
> BarChart[probs, cumprobs, PlotRange->{0,1}]
>
>
>