R/global.R

In dannymorris/colstats: Column-wise statistics for data frames

x <- iris

count_n <- function(x) {
  length(x)
}

percent_na <- function(x) {
  (sum(is.na(x)) / length(x)) %>%
    round(., 3)
}

count_na <- function(x) {
  length(x[is.na(x)])
}

count_n_distinct <- function(x) {
  dplyr::n_distinct(x)
}

get_class <- function(x) {
  class(x)
}