### R code from vignette source 'C:/Bendix/teach/NSCE/2022/pracs/infant-sol.rnw'

###################################################
### code chunk number 1: infant-sol.rnw:11-15
###################################################
Y <- (33200 + 32500)/2
D <- 269
I <- 1000* D/Y
round( c( D, Y, I ), 2)


###################################################
### code chunk number 2: infant-sol.rnw:20-23
###################################################
B <- 32800
IMR <- 1000* D/B
round( c(D, B, IMR), 2)