dat <- data.frame(x = c(1, NA, NA, 6, 3),
y = c(7, NA, 8, 9, NA),
z = c(2, NA, 3, NA, 5))
# Compute proportion of missing data (\code{NA}) for each case in the data frame
na.prop(dat)
Run the code above in your browser using DataLab