免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 2590 | 回复: 7
打印 上一主题 下一主题

[文本处理] 去重但需要保留重复的前3行 [复制链接]

论坛徽章:
4
程序设计版块每日发帖之星
日期:2015-10-14 06:20:00每日论坛发贴之星
日期:2015-10-14 06:20:00程序设计版块每日发帖之星
日期:2016-05-02 06:20:00程序设计版块每日发帖之星
日期:2016-05-08 06:20:00
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2016-06-11 11:20 |只看该作者 |倒序浏览
本帖最后由 mswsg 于 2016-06-11 11:21 编辑

第一列重复多次,需要保留重复的前三行,如果重复不足三次,则全部保留格式如下
  1. UN225387        lcl|TGACv1_scaffold_435381_5DL       
  2. UN225387        lcl|TGACv1_scaffold_308699_4AS       
  3. UN225387        lcl|TGACv1_scaffold_158570_2DL       
  4. UN225387        lcl|TGACv1_scaffold_093601_2AL
复制代码
结果
  1. UN225387        lcl|TGACv1_scaffold_435381_5DL       
  2. UN225387        lcl|TGACv1_scaffold_308699_4AS       
  3. UN225387        lcl|TGACv1_scaffold_158570_2DL
复制代码

论坛徽章:
769
金牛座
日期:2014-02-26 17:49:58水瓶座
日期:2014-02-26 18:10:15白羊座
日期:2014-04-15 19:29:52寅虎
日期:2014-04-17 19:43:21酉鸡
日期:2014-04-19 21:24:10子鼠
日期:2014-04-22 13:55:24卯兔
日期:2014-04-22 14:20:58亥猪
日期:2014-04-22 16:13:09狮子座
日期:2014-05-05 22:31:17摩羯座
日期:2014-05-06 10:32:53处女座
日期:2014-05-12 09:23:11子鼠
日期:2014-05-21 18:21:27
2 [报告]
发表于 2016-06-11 11:47 |只看该作者
  1. awk 'a[$1]++<3' urfile
复制代码

评分

参与人数 1可用积分 +5 收起 理由
mswsg + 5 很给力! 超屌

查看全部评分

论坛徽章:
4
程序设计版块每日发帖之星
日期:2015-10-14 06:20:00每日论坛发贴之星
日期:2015-10-14 06:20:00程序设计版块每日发帖之星
日期:2016-05-02 06:20:00程序设计版块每日发帖之星
日期:2016-05-08 06:20:00
3 [报告]
发表于 2016-06-11 11:54 |只看该作者
我自己试着用python写了一个,貌似可以实现
  1. with open('1.2.txt', 'r') as f:
  2.     a = []
  3.     for line in f:
  4.         lin =line.strip().split()
  5.         if a.count(lin[0])< 3:
  6.             print line
  7.             a.append(lin[0])
复制代码

论坛徽章:
307
程序设计版块每周发帖之星
日期:2016-04-08 00:41:33操作系统版块每日发帖之星
日期:2015-09-02 06:20:00每日论坛发贴之星
日期:2015-09-02 06:20:00程序设计版块每日发帖之星
日期:2015-09-04 06:20:00每日论坛发贴之星
日期:2015-09-04 06:20:00每周论坛发贴之星
日期:2015-09-06 22:22:00程序设计版块每日发帖之星
日期:2015-09-09 06:20:00程序设计版块每日发帖之星
日期:2015-09-19 06:20:00程序设计版块每日发帖之星
日期:2015-09-20 06:20:00每日论坛发贴之星
日期:2015-09-20 06:20:00程序设计版块每日发帖之星
日期:2015-09-22 06:20:00程序设计版块每日发帖之星
日期:2015-09-24 06:20:00
4 [报告]
发表于 2016-06-11 12:20 |只看该作者
  1. perl -00 -pe 's/((?:(\S+)\N+\n){1,3})(\2\N+\n)*/$1/g' f
复制代码
UN225387        lcl|TGACv1_scaffold_435381_5DL
UN225387        lcl|TGACv1_scaffold_308699_4AS
UN225387        lcl|TGACv1_scaffold_158570_2DL

评分

参与人数 1可用积分 +5 收起 理由
mswsg + 5 赞一个!

查看全部评分

论坛徽章:
28
15-16赛季CBA联赛之八一
日期:2016-02-22 19:10:4215-16赛季CBA联赛之深圳
日期:2016-12-01 10:34:0415-16赛季CBA联赛之新疆
日期:2016-12-07 10:24:2915-16赛季CBA联赛之同曦
日期:2016-12-15 12:06:43CU十四周年纪念徽章
日期:2016-12-18 13:03:4415-16赛季CBA联赛之吉林
日期:2017-01-03 15:52:2515-16赛季CBA联赛之辽宁
日期:2017-01-04 14:58:2415-16赛季CBA联赛之辽宁
日期:2017-01-15 09:42:512016科比退役纪念章
日期:2017-02-06 17:21:50黑曼巴
日期:2017-02-10 15:46:1215-16赛季CBA联赛之上海
日期:2017-03-18 10:14:5415-16赛季CBA联赛之青岛
日期:2017-03-18 22:00:44
5 [报告]
发表于 2016-06-14 10:55 |只看该作者
  1. sed -r ':a;1,2{N;ba};:b;N;/(\S+\s+)\S+\s*(\n\1\S+\s*){3}/{s/\n[^\n]*$//;tb};P;D'
复制代码

论坛徽章:
0
6 [报告]
发表于 2016-06-14 13:54 |只看该作者
print line.strip("\n")吧,不然每行多出了换行符号。回复 3# mswsg


   

论坛徽章:
4
程序设计版块每日发帖之星
日期:2015-10-14 06:20:00每日论坛发贴之星
日期:2015-10-14 06:20:00程序设计版块每日发帖之星
日期:2016-05-02 06:20:00程序设计版块每日发帖之星
日期:2016-05-08 06:20:00
7 [报告]
发表于 2016-06-14 16:09 |只看该作者
是的,实际上已修改。这样也可以
  1. print line,
复制代码
回复 6# 重楼君


   

论坛徽章:
4
程序设计版块每日发帖之星
日期:2015-10-14 06:20:00每日论坛发贴之星
日期:2015-10-14 06:20:00程序设计版块每日发帖之星
日期:2016-05-02 06:20:00程序设计版块每日发帖之星
日期:2016-05-08 06:20:00
8 [报告]
发表于 2016-06-14 16:12 |只看该作者
实际上已经修改了
  1. print line,
复制代码
回复 6# 重楼君


   
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP