open_in_new
content_copy
sapply(data, function(x) sum(is.na(x)))