R/freq_out.R

In etesdahl/fooFactors: Fixing Those Very Pesky Factor Habits

#' Make a frequency table for a factor
#'
#' @param x factor
#'
#' @return tbl_df
#' @export
#'
#' @examples
#' #' freq_out(iris$Species)
freq_out <- function(x){
    xdf <- dplyr::data_frame(x)
    dplyr::count(xdf,x)
    }