if (FALSE) {
result <- vimpute(sleep, method = "ranger", m = 5, seed = 1)
plot(result) # convergence chains
plot(result, "density") # observed vs imputed densities
plot(result, "strip") # observed vs imputed values
}
Run the code above in your browser using DataLab