report21211208

h <- c(180,169,173)
w <- c(73,87,43)
bmi <- w/(h/100)^2
bmi

## [1] 22.53086 30.46112 14.36734

plot(bmi)