dplyr: apply function table() to each column of a data.frame

Question

Apply function table() to each column of a data.frame using dplyr

I often apply the table-function on each column of a data frame using plyr, like this:

Answer 1

Using tidyverse (dplyr and purrr):

library(tidyverse)

mtcars %>%
    map( function(x) table(x) )

Or simply:

library(tidyverse)

mtcars %>%
    map( table )