### Avoidable admissions (Charlotte Woodhead) ##Multiple imputation ## Peter Martin #Data source("MH avoidable data preparation.R") apply(xyfin2, 2, num_na) md.pattern(xyfin2[,35:41]) RNGkind(sample.kind = "Rounding") xymice = mice(xyfin2, m = 5, meth = 'pmm', maxit = 50, seed = 3105) summary(xymice) xymice1 = complete(xymice, 1) xymice2 = complete(xymice, 2) xymice3 = complete(xymice, 3) xymice4 = complete(xymice, 4) xymice5 = complete(xymice, 5)