在R中有两个表格，连个两个中具有部分相同的元素，如何提取这写相同元素？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

例如有表1

属性1	属性2
15	44
17	32
14	34
20	43
32	55

表2

属性1	属性2
18	65
17	32
30	110
20	43
24	45

现要取出表1和表2共同的元素，存储在表3中

表3

属性1	属性2
17	32
20	43

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：如何提取 相同元素 数据 提取 相同元素

同问 ，有哪位好心人会呀

还是用
merger 函数啊

蓝色 发表于 2015-8-5 18:13
还是用
merger 函数啊

上面两个表只是示例表，我实际处理的数据有几十万个，并且属性1和属性2的数据有很多重复，我用mergec函数处理时出现了错误'by' must specify uniquely valid columns，由于初学R语言，搞不太清楚，总是出错丫

想不出来办法，可以写个循环

1. data <- vector("numeric")
   
2. for(i in 1:nrow(data1)){
   
3.     temp <- data2[which(data2[,2]==data1[i,2]),1]
   
4.     temp2 <- sum(temp==data1[i,1])
   
5.     data <- rbind(data,data.frame(matrix(data1[i,],ncol=2)))
   
6. }

复制代码

其中如果data1某一行在data2中出现两次，只记录一次

> a<-data.frame(name=c('li','zhang'),fenshu=1:2)
> a
   name fenshu
1    li      1
2 zhang      2
> b<-data.frame(name=c('liw','zhang'),fenshu=1:2)
> b
   name fenshu
1   liw      1
2 zhang      2
> d<-rbind(a,b)
d[duplicated(d),]

merge(data.a, data.b, by = c("属性1", "属性2"))  

蓝色 发表于 2015-8-6 14:28
merge(data.a, data.b, by = c("属性1", "属性2"))

谢谢你

蓝色 发表于 2015-8-6 14:28
merge(data.a, data.b, by = c("属性1", "属性2"))