dat <- data.frame(x1 = c(1, NA, 2, 5, 3, NA, 5, 2),
x2 = c(4, 2, 5, 1, 5, 3, 4, 5),
x3 = c(NA, 3, 2, 4, 5, 6, NA, 2),
x4 = c(5, 6, 3, NA, NA, 4, 6, NA))
# Auxiliary variables
na.auxiliary(dat)
Run the code above in your browser using DataLab