去除一列数据中出现次数只有一次的数据

yilence

6374

收藏 2015-04-04

比如我有一类数据
name,score
1,2
1,2
2,3
3,2
3,4
看第一列的数据，1和3都出现两次，2至出现一下，删除2这条记录。请教一下是否有好的方法？

扫码加我拉你入群

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

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

全部回复

hugebear

2015-4-5 03:24:32

可以写一个简单的小函数来实现操作：

复制代码

扫码加我拉你入群

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

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

zxn2011

2015-4-5 05:41:27

as.data.frame(table(name))结果是两列一列是name一列是name的frequency
把frequency=1的name挑出来
delete相应的观测值

扫码加我拉你入群

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

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

ofzhengyi

2015-4-5 15:44:43

用dplyr包实现比较简单。
library(dplyr)
dat %>% group_by(name) %>% mutate(count=n()) %>% filter(n>1) %>% select(-count)

扫码加我拉你入群

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

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

lanyajia

2015-4-5 17:13:04

dt=data.frame(name=c(1,1,2,3,3),score=c(2,2,3,2,4))
unique(dt)

扫码加我拉你入群

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

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

yilence

2015-4-5 19:57:46

hugebear 发表于 2015-4-5 03:24
可以写一个简单的小函数来实现操作：

谢谢，新学了不少函数

扫码加我拉你入群

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

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

点击查看更多内容…

yilence

2015-4-5 19:58:19

ofzhengyi 发表于 2015-4-5 15:44
用dplyr包实现比较简单。
library(dplyr)
dat %>% group_by(name) %>% mutate(count=n()) %>% filter(n>1 ...

没用过这个包，看起来很高端

扫码加我拉你入群

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

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

yilence

2015-4-5 20:01:39

我自己也解决了一下这个问题

复制代码

主要思路是把出现次数大于1的名字提出来，然后join操作一下。

扫码加我拉你入群

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

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

yilence

2015-4-6 22:22:32

ofzhengyi 发表于 2015-4-5 15:44
用dplyr包实现比较简单。
library(dplyr)
dat %>% group_by(name) %>% mutate(count=n()) %>% filter(n>1 ...

今天认真看了一下这个包，功能真实很强大！再次感谢~！

扫码加我拉你入群

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

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

ofzhengyi

2015-4-7 11:35:10

yilence 发表于 2015-4-6 22:22
今天认真看了一下这个包，功能真实很强大！再次感谢~！

客气了。可以减少很多代码量~

扫码加我拉你入群

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

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

李鑫ltx

2018-3-29 20:29:55

ofzhengyi 发表于 2015-4-5 15:44
用dplyr包实现比较简单。
library(dplyr)
dat %>% group_by(name) %>% mutate(count=n()) %>% filter(n>1 ...

看了您的回答收获很多，我想请问的是，count是计数函数，count=n()我不太清楚是什么意思，百度也没有找到。您可以解答一下吗？然后我套用的这段代码，想要处理的是删掉出现过两次及以上的id，最后更改filter里的n为count代码方能运行。请问是为什么，望赐教！感谢！

扫码加我拉你入群

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

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

swufeyumeng

2018-3-30 16:48:59

复制代码

办法很多，就像大家讨论的，可以用R自带的函数，可以用dplyr，或者写个循环，简单粗暴。但是，能用现成轮子解决的问题，就尽量不要自己造轮子。上面的方法跟藤椅@zxn2011的思路一样，涉及的关键函数有table（统计频数），merge（数据框合并），subset（按条件筛选数据框）。

扫码加我拉你入群

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

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

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群