R中如何统计多维的频数

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

大家好，如何统计多维的频数，例如：t 为
1,2
2,3
2,4
2,1
2,3
2,1
1,2
我要统计出1,2对应出现过多少次，2,3出现过多少次，等等，进行统计。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏2 回帖

关键词：大家好 如何 统计

不知道 1 2 跟 2 1 是不是一个？

如果不是的话：
新建一个变量： data＊freq <- paste(data＊x1,data＊x2,sep=',')
只要计算新变量freq的频数就行了。

如果是：          data＊freq <- paste(sort(data＊x1,data＊x2), collapse = ',')
＊ 应为美元符号，打不出来。。

1. > a<-matrix(c(1,2,3,2,1,1,2,2,2,2,3,3,3,3),ncol=2)
   
2. > a
   
3.      [,1] [,2]
   
4. [1,]    1    2
   
5. [2,]    2    2
   
6. [3,]    3    2
   
7. [4,]    2    3
   
8. [5,]    1    3
   
9. [6,]    1    3
   
10. [7,]    2    3
    
11. > which(a[,1]==2&a[,2]==3)
    
12. [1] 4 7

复制代码

万人往LVR 发表于 2015-9-8 15:14

您好，感谢你的回复，我想请问一下，如果我要统计所有出现的一对一对出现的次数，要怎么处理。如果是一维的话我知道可以用table处理，对于二维的要怎么统计频数呢？

1. a<-matrix(c(1,2,3,2,1,1,2,2,2,2,3,3,3,3),ncol=2)
   
2. b <- vector("character",nrow(a))
   
3. for(i in 1:nrow(a)){
   
4.         b[i] <- paste(a[i,1],a[i,2],sep=",")
   
5. }
   
6. table(b)

复制代码

万人往LVR 发表于 2015-9-8 17:04

谢谢，R没有提供这种功能的函数吗？

1. a<-matrix(c(1,2,3,2,1,1,2,2,2,2,3,3,3,3),ncol=2)
   
2. a <- data.frame(a)
   
3. table(a)

复制代码

1. a <- matrix(c(1,2,2,3,2,4,2,1,2,3,2,1,1,2),nrow = 7,ncol = 2,byrow = T)
   
2. b <- rep(1,7)
   
3. c <- data.frame(a,b)
   
4. xtabs(c[,3] ~ c[,1] + c[,2])
   
5.       c$X2
   
6. c$X1 1 2 3 4
   
7.      1 0 2 0 0
   
8.      2 2 0 2 1

复制代码

   

如果被频数的二维向量是整数(x,y)的话,若max(x)<10^n,可以找到一个从(x,y)到z的一一映射，例如z=x+y*10^n;我们直接统计z的频数就行了。或者把x.y转换成字符串，然后对所有字符串向量"x.y"组成的向量用table()