Prussian Deaths by Horse Kick

library(vcd)
## Loading required package: grid
data(VonBort)
head(VonBort)
##   deaths year corps fisher
## 1      0 1875     G     no
## 2      0 1875     I     no
## 3      0 1875    II    yes
## 4      0 1875   III    yes
## 5      0 1875    IV    yes
## 6      0 1875     V    yes
table(VonBort$deaths)
## 
##   0   1   2   3   4 
## 144  91  32  11   2

A Graphical Depiction of the data

A basic histogram with an overlay of the Poisson (0.7 deaths per year).