r - 如何将 Janitor::tabyl 应用于数据表上的几列？

Question

我有一个数据框:

ID   value    value_type
A    256       new
B    543       new
A    544       old

我想将 janitor::tabyl 应用于列 ID 和 value_type 以获得:

ID
     n    percent
A    2     0.66
B    1     0.33


value_type

       n    percent
new    2     0.66
old    1     0.33

我怎么能那样做？当我做:

janitor::tabyl(dt[, c(ID, value_type)])

它不会按列分隔这些统计表

Answer 1

library(purrr)
library(dplyr)

df %>% map(., ~tabyl(.))

您可以选择所需的列:

df %>% 
  select(ID, value_type) %>% 
  map(., ~tabyl(.))

这给了我们:

$ID
 . n   percent
 A 2 0.6666667
 B 1 0.3333333

$value_type
   . n   percent
 new 2 0.6666667
 old 1 0.3333333