dplyr :: summarise_each with count（）或tally（）来计算满足条件的次数

Question

我有一个数据框，每列中的1计数不同，如下所示：

dat <- 
  data.frame('col1' = rep(c(0, 1), 6), 
             'col2' = rep(c(0:2), 4), 
             'col3' = rep(c(0:3), 3))

我尝试使用dplyr::summarise_each以编程方式执行以下操作：

dat_new <- 
  data.frame(tally(dat, col1 == 1), # or count()
             tally(dat, col2 == 1), 
             tally(dat, col3 == 1))

为每列提供满足条件rowvalue == 1的位置的计数（在本例中分别为6,4和3）。但是，我真的很难尝试做一些我觉得应该很容易的事情，我会假设使用dplyr::summarise_each()。我在网上找到的所有帮助通常都需要一些预先分组，但在这种情况下这不是必需的。非常感谢您的帮助