r - 带有 Cbind 的 xTabs - 将报告的值拆分为子类别

Question

使用以下代码

xtabs(cbind(violentIncidents, nonviolentIncidents, allPart1s) ~ District + pnum, data = cadincmerge_ag4wk)

这将暴力事件、非暴力事件、所有部分 1 合并为一个总数，但是，我怎样才能将它按 pnum 拆分，使其看起来像这样：

谢谢你。

标签： r

Answer 1

如果我们需要在多个列上汇总多个组，我们可以使用tidyverse. 使用分组列将数据重塑为“长”格式pivot_longer，然后按列名分组，“值”获取sum列的across

library(dplyr) # 1.0.0
library(tidyr)
mtcars %>%
     pivot_longer(cols = c(vs, am)) %>% 
     group_by(name, value) %>%
     summarise(across(c(cyl, gear, carb), sum))