Re: Binomialverteilung als Balkendiagramm

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

Hallo Heiko,

> ZusÀtzlich soll der Balken fÌr den 0. Treffer (k=0) bei -0,5 beginnen  
> und bei 0.5 enden.
> Allgemein sollte die Darstellung vom k.Treffer um -0,5+k bis 0,5+k  
> (k=0,..,n) gehen. Wichtig wÀre noch die Beschriftung der x-Achse in  
> ganzen Zahlen von 0 bis n.

In[29]:= Clear[rBD]
rBD[x_, d_] :=
 Rectangle[{x - d, 0}, {x + d, PDF[ BinomialDistribution[5, 0.2], x]}]

In[35]:= Show[Graphics[{EdgeForm[Thick], LightGray,
   Table[rBD[x, 1/2], {x, 0, 5}]}], Frame -> True,
 AspectRatio -> 1/GoldenRatio]

> Das funktioniert in BarChart wohl nicht.

BarChart[] und RectangleChar[] sehen die Charts als Funktion des  
Basislinie,
aber die Basislinie selbst ist eine Menge von Markierungen.
Es sind einfach Diagramme mit Marken, man koennte zum Beispiel abtragen


BarChart[{1, 6, 4, 9, 0, 3, 1, 8, 4},
 ChartLabels -> {"Enten", "Katzen", "Vögel", "Hunde", "Schnecken",
   "Schlangen", "Insekten", "Pferde", "Fische"}, Frame -> True,
 PlotLabel -> "Ausgaben fuer Tieraerztliche Behandlung"]

und Katzen hÀtten zwar Kosten 6 hervorgerufen, aber nicht _nach_ den Enten  
und es
gilt auch nicht Katzen > Enten, der Inhalt des Charts bleibt erhalten,  
wenn man
die Wertepaare mischt.

Gruss
Udo.