dotchart(t(VADeaths), xlim = c(0, 100), main = "Death Rates in Virginia - 1940")