R/df_completness.R

In baky0905/datacompleteR: Data Completness Table Generator

#' @title df_completness
#'
#' @description This function will generate data completness tibble.
#'
#' @param dataframe
#'
#' @return tibble
#'
#' @examples
#' dataset <- datasets::cars
#'
#' @export
#'


df_completness  <- function(dataframe) {
  dataframe <- purrr::map_df(.x = dataframe,
                ~{mean(is.na(.x)) * 100})
  return(dataframe)
}