好吧,这应该是一个简单的问题,但我正在寻找一种尽可能快的解决方案。
假设我有 3 个表(表的数量会更大):
tab1 <- table(c(1, 1, 1, 2, 2, 3, 3, 3))
tab2 <- table(c(1, 1, 4, 4, 4))
tab3 <- table(c(1, 1, 2, 3, 5))
这就是我们得到的:
> tab1
1 2 3
3 2 3
> tab2
1 4
2 3
> tab3
1 2 3 5
2 1 1 1
我想要快速地使其与许多大表一起使用是这样的:
1 2 3 4 5
7 3 4 3 1
所以,基本上这些表都是汇总的names
。是否有一个基本函数可以实现我所缺少的功能?感谢您的帮助!
我们连接(c
) the tab
输出创建“v1”,使用tapply
得到sum
由 分组的元素names
那个物体的。
v1 <- c(tab1, tab2, tab3)
tapply(v1, names(v1), FUN=sum)
#1 2 3 4 5
#7 3 4 3 1
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)