Ashwin Revo
Sept. 22, 2016
Source: wikipedia
B.M.I = (Weight in pounds)/(Height in inches2 ) * 703 kg/m2
summary(women)
height weight
Min. :58.0 Min. :115.0
1st Qu.:61.5 1st Qu.:124.5
Median :65.0 Median :135.0
Mean :65.0 Mean :136.7
3rd Qu.:68.5 3rd Qu.:148.0
Max. :72.0 Max. :164.0
bmi = women$weight/(women$height^2)*703
mx = mean(bmi)
hist(bmi, xlab="B.M.I.(kg/m2)", breaks=5, main="Histogram of B.M.I.")
abline(v = mx, col = "blue", lwd = 2)