#' Gets complete columns
#'
#' @param data A dataframe
#' @param desiredCols Columns which you want to have no missing values
#' @examples
#' complete_fun(data, desiredCols)
complete_fun <- function(data, desiredCols) {
completeVec <- complete.cases(data[, desiredCols])
return(data[completeVec, ])
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.