if (FALSE) {
result <- vimpute(sleep, method = "ranger", m = 5, boot = TRUE, uncert = "normalerror")
d1 <- vim_complete(result, 1) # first completed dataset
all_d <- vim_complete(result, "all") # list of 5 datasets
long_d <- vim_complete(result, "long") # long format with .imp column
# With mice or tidyr attached, the generic dispatches to the same function:
# library(mice); d1 <- complete(result, 1)
}
Run the code above in your browser using DataLab