num_of_NAs <- function(x){
df <- data.frame(sapply(x, function(y) sum(length(which(is.na(y))))))
names(df) <- c("# of NAs")
View(df)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.