免费注册 查看新帖 |

Chinaunix

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

[文本处理] 第一列相同,输出第三列到一行。 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2014-10-29 19:31 |只看该作者 |倒序浏览
原始数据:
1       Alyrata 489168
1       Athaliana       AT5G23110.1
1       Crubella        Carubv10000018m
1       Thalophila      Thhalv10003499m
1       Brapa   Bra013017
1       Tparvula        Tp2g24010     
2       Alyrata 355042
2       Athaliana       AT4G17140.3
2       Crubella        Carubv10006303m
2       Thalophila      Thhalv10024176m
2       Brapa   Bra021067
2       Tparvula        Tp7g17050      
3       Alyrata 473945
3       Athaliana       AT1G48090.1
3       Crubella        Carubv10012395m
3       Thalophila      Thhalv10011170m
3       Brapa   Bra014101
3       Tparvula        Tp1g35040   

如果第一列相同 则把第三列的合并为一行 最终结果为
1 489168 AT5G23110.1 Carubv10000018m Thhalv10003499m Bra013017 Tp2g24010
2 355042 AT4G17140.3 Carubv10006303m Thhalv10024176m Bra021067 Tp7g17050
3 473945 AT1G48090.1 Carubv10012395m Thhalv10011170m Bra014101 Tp1g35040

请大家帮忙 谢谢!

论坛徽章:
0
2 [报告]
发表于 2014-10-29 19:37 |只看该作者
再回复一句 并不是第一列相同的行数都为6回复 1# 120215


   

论坛徽章:
30
申猴
日期:2014-04-10 09:43:532015年亚洲杯纪念徽章
日期:2015-03-20 14:40:232015亚冠之阿尔纳斯尔
日期:2015-06-02 18:59:042015亚冠之阿尔希拉尔
日期:2015-06-30 15:22:572015亚冠之大阪钢巴
日期:2015-07-20 10:44:332015亚冠之阿尔纳斯尔
日期:2015-10-28 14:57:5215-16赛季CBA联赛之新疆
日期:2015-12-25 10:18:45黑曼巴
日期:2016-06-26 21:39:5315-16赛季CBA联赛之山西
日期:2016-07-25 21:54:2715-16赛季CBA联赛之北京
日期:2016-10-27 12:07:2315-16赛季CBA联赛之八一
日期:2017-07-07 16:39:0915-16赛季CBA联赛之吉林
日期:2017-09-04 12:14:43
3 [报告]
发表于 2014-10-29 19:45 |只看该作者
[ 本帖最后由 zxy877298415 于 2014-10-29 20:12 编辑 ]

awk  '{a[$1]=a[$1]?a[$1]" "$3:$3}END{for (i in a) print i,a[i]}' file


   

论坛徽章:
0
4 [报告]
发表于 2014-10-29 20:07 |只看该作者
本帖最后由 120215 于 2014-10-29 20:08 编辑

报错啊
awk: {a[$1]=a[$1]?a[$1]" "$3}END{for (i in a) print i,a}
awk:                                    ^ syntax error
回复 3# zxy877298415


   

论坛徽章:
30
申猴
日期:2014-04-10 09:43:532015年亚洲杯纪念徽章
日期:2015-03-20 14:40:232015亚冠之阿尔纳斯尔
日期:2015-06-02 18:59:042015亚冠之阿尔希拉尔
日期:2015-06-30 15:22:572015亚冠之大阪钢巴
日期:2015-07-20 10:44:332015亚冠之阿尔纳斯尔
日期:2015-10-28 14:57:5215-16赛季CBA联赛之新疆
日期:2015-12-25 10:18:45黑曼巴
日期:2016-06-26 21:39:5315-16赛季CBA联赛之山西
日期:2016-07-25 21:54:2715-16赛季CBA联赛之北京
日期:2016-10-27 12:07:2315-16赛季CBA联赛之八一
日期:2017-07-07 16:39:0915-16赛季CBA联赛之吉林
日期:2017-09-04 12:14:43
5 [报告]
发表于 2014-10-29 20:12 |只看该作者
回复 4# 120215
这回行了!


   

论坛徽章:
0
6 [报告]
发表于 2014-10-29 20:19 |只看该作者
我能斗胆劳烦你 稍作解释吗?谢谢了!回复 5# zxy877298415


   

论坛徽章:
30
申猴
日期:2014-04-10 09:43:532015年亚洲杯纪念徽章
日期:2015-03-20 14:40:232015亚冠之阿尔纳斯尔
日期:2015-06-02 18:59:042015亚冠之阿尔希拉尔
日期:2015-06-30 15:22:572015亚冠之大阪钢巴
日期:2015-07-20 10:44:332015亚冠之阿尔纳斯尔
日期:2015-10-28 14:57:5215-16赛季CBA联赛之新疆
日期:2015-12-25 10:18:45黑曼巴
日期:2016-06-26 21:39:5315-16赛季CBA联赛之山西
日期:2016-07-25 21:54:2715-16赛季CBA联赛之北京
日期:2016-10-27 12:07:2315-16赛季CBA联赛之八一
日期:2017-07-07 16:39:0915-16赛季CBA联赛之吉林
日期:2017-09-04 12:14:43
7 [报告]
发表于 2014-10-29 20:32 |只看该作者
回复 6# 120215
就是声明一个数组,如果这个数组为空就把第三列赋值给这个数组,当不为空的时候就依次把第三列追加到这个数组中,最后遍历这个数组,打印出你需要的值。


   

论坛徽章:
0
8 [报告]
发表于 2014-10-30 05:44 |只看该作者
提示: 作者被禁止或删除 内容自动屏蔽

论坛徽章:
32
处女座
日期:2013-11-20 23:41:20双子座
日期:2014-06-11 17:20:43戌狗
日期:2014-06-16 11:05:00处女座
日期:2014-07-22 17:30:47狮子座
日期:2014-07-28 15:38:17金牛座
日期:2014-08-05 16:34:01亥猪
日期:2014-08-18 13:34:25白羊座
日期:2014-09-02 15:03:55金牛座
日期:2014-11-10 10:23:58处女座
日期:2014-12-02 09:17:52程序设计版块每日发帖之星
日期:2015-06-16 22:20:002015亚冠之塔什干火车头
日期:2015-06-20 23:28:22
9 [报告]
发表于 2014-10-30 09:13 |只看该作者
  1. [root@localhost ~]# awk '{a[$1]=a[$1]?a[$1]" "$3:$3}END{for(i in a)print i,a[i]}' i
  2. 1 489168 AT5G23110.1 Carubv10000018m Thhalv10003499m Bra013017 Tp2g24010
  3. 2 355042 AT4G17140.3 Carubv10006303m Thhalv10024176m Bra021067 Tp7g17050
  4. 3 473945 AT1G48090.1 Carubv10012395m Thhalv10011170m Bra014101 Tp1g35040
  5. [root@localhost ~]#
复制代码

论坛徽章:
32
处女座
日期:2013-11-20 23:41:20双子座
日期:2014-06-11 17:20:43戌狗
日期:2014-06-16 11:05:00处女座
日期:2014-07-22 17:30:47狮子座
日期:2014-07-28 15:38:17金牛座
日期:2014-08-05 16:34:01亥猪
日期:2014-08-18 13:34:25白羊座
日期:2014-09-02 15:03:55金牛座
日期:2014-11-10 10:23:58处女座
日期:2014-12-02 09:17:52程序设计版块每日发帖之星
日期:2015-06-16 22:20:002015亚冠之塔什干火车头
日期:2015-06-20 23:28:22
10 [报告]
发表于 2014-10-30 09:15 |只看该作者
  1. [root@localhost ~]# perl -lane 'push @{$h{$F[0]}},$F[-1];END{for(sort keys %h){print join " ",$_,@{$h{$_}}}}' i
  2. 1 489168 AT5G23110.1 Carubv10000018m Thhalv10003499m Bra013017 Tp2g24010
  3. 2 355042 AT4G17140.3 Carubv10006303m Thhalv10024176m Bra021067 Tp7g17050
  4. 3 473945 AT1G48090.1 Carubv10012395m Thhalv10011170m Bra014101 Tp1g35040
  5. [root@localhost ~]#
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP