Re: AW: RE: Binomialverteilung als Balkendiagramm

["Udo und Susanne Krause" <su.krause@XXXXXXX.ch>]

On Thu, 27 Jun 2013 22:06:49 +0200, Heiko B <exziton@XXXXXXX.com> wrote:

> hÀufig ist ein Ausschnitt einer Binomialverteilung gesucht, wie dieser:
>
> BarChart[Evaluate@
>   Table[PDF[BinomialDistribution[100, 0.5], x], {x, 30, 70}],
>  BarSpacing -> None, ChartLabels -> {"0", "1", "2", "3", "4", "5"}]
>
>
> nur funktioniert ChartLabels hier nicht.

Ja, so geschrieben treffen 41 Messpunkte auf 6 ChartLabels ... also  
schreibt man

With[{uG = 30, oG = 70},
 BarChart[
  Evaluate@Table[PDF[BinomialDistribution[100, 0.5], x], {x, uG, oG}],
   BarSpacing -> None, ChartLabels -> ToString /@ Range[uG, oG]]
 ]

und es funktioniert.