免费注册 查看新帖 |

Chinaunix

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

[文本处理] 求助awk!根据字段1多行变一行 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2014-07-25 10:02 |只看该作者 |倒序浏览
原始文件如下:
1 aaa  9  x1
1 bbb  73 x2
2 ccc  8  x3
3 ddd  7  x4
4 fff  81 x5
3 ggg  10 x6

希望得到的结果是
1  aaa/bbb  9/73  x1/x2
2  ccc  8  x3
3  ddd/ggg  7/10  x4/x6
4  fff  81  x5

请各位老师帮忙,谢谢!

论坛徽章:
2
射手座
日期:2014-10-10 15:59:4715-16赛季CBA联赛之上海
日期:2016-03-03 10:27:14
2 [报告]
发表于 2014-07-25 10:10 |只看该作者
回复 1# Ienovo_qq
  1. awk '{for(i=2;i<=NF;i++)a[$1][i]=a[$1][i]"/"$i}END{for(i in a){printf i" "; for(j=2;j<=NF;j++)printf gensub(/\//,"",1,a[i][j])" ";print ""}}'
复制代码

论坛徽章:
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
3 [报告]
发表于 2014-07-25 10:12 |只看该作者
  1. awk '{a[$1];for(i=1;i++<NF;)b[$1,i]=b[$1,i]!=""?b[$1,i]"/"$i:$i}END{for(i in a){printf i;for(j=1;j++<NF;)printf " "b[i,j];print ""}}'
复制代码

论坛徽章:
0
4 [报告]
发表于 2014-07-25 10:27 |只看该作者
回复 2# yinyuemi

谢谢!能详细讲讲代码就更好了。
   

论坛徽章:
7
亥猪
日期:2013-10-10 17:00:29辰龙
日期:2013-10-12 16:23:19卯兔
日期:2013-11-18 17:01:27金牛座
日期:2014-09-09 10:17:052015七夕节徽章
日期:2015-08-21 11:06:172015亚冠之柏太阳神
日期:2015-09-25 13:56:42数据库技术版块每日发帖之星
日期:2016-08-06 06:20:00
5 [报告]
发表于 2014-07-25 11:05 |只看该作者
  1. awk '{for(i=2;i<=NF;i++)a[$1,i]=b[$1]?a[$1,i] "/" $i : $i;b[$1]=1}END{for(i in b){printf i FS;for(j=2;j<=NF;j++)printf a[i,j] FS}print ""}' file
复制代码

论坛徽章:
33
ChinaUnix元老
日期:2015-02-02 08:55:39CU十四周年纪念徽章
日期:2019-08-20 08:30:3720周年集字徽章-周	
日期:2020-10-28 14:13:3020周年集字徽章-20	
日期:2020-10-28 14:04:3019周年集字徽章-CU
日期:2019-09-08 23:26:2519周年集字徽章-19
日期:2019-08-27 13:31:262016科比退役纪念章
日期:2022-04-24 14:33:24
6 [报告]
发表于 2014-07-25 11:28 |只看该作者
回复 4# Ienovo_qq


    你哪里看不懂直接问就更好了

论坛徽章:
9
寅虎
日期:2013-12-02 12:49:22巨蟹座
日期:2014-07-18 18:13:34卯兔
日期:2014-07-25 14:43:08子鼠
日期:2014-07-26 10:10:51酉鸡
日期:2014-07-31 15:09:562015亚冠之本尤德科
日期:2015-05-19 09:27:382015亚冠之卡尔希纳萨夫
日期:2015-06-20 10:30:212015亚冠之阿尔纳斯尔
日期:2015-07-01 20:46:062015亚冠之城南
日期:2015-07-15 21:12:00
7 [报告]
发表于 2014-07-25 12:46 |只看该作者
本帖最后由 lifayi2008 于 2014-07-25 13:19 编辑
  1. root@ubuntu14:~/test# cat c.txt
  2. 1 aaa  9  x1
  3. 1 bbb  73 x2
  4. 2 ccc  8  x3
  5. 3 ddd  7  x4
  6. 4 fff  81 x5
  7. 3 ggg  10 x6
  8. root@ubuntu14:~/test# awk -f test.awk c.txt
  9. 1 aaa/bbb 9/73 x1/x2
  10. 2 ccc 8 x3
  11. 3 ddd/ggg 7/10 x4/x6
  12. 4 fff 81 x5
  13. root@ubuntu14:~/test# cat test.awk
  14. BEGIN{
  15. ORS="/"
  16. }
  17. {
  18. n=++a[$1]
  19. for(m=2;m<=NF;m++)
  20.         b[$1][m][n]=$m
  21. }
  22. END{
  23. for(i=1;i<NR;i++){
  24.         if(a[i]==0)
  25.                 continue
  26.         printf "%d ",i
  27.         for(j=2;j<=length(b[i])+1;j++){
  28.                 for(p=1;p<=length(b[i][j]);p++){
  29.                         print b[i][j][p]
  30.                 }
  31.                 printf "\b "
  32.         }
  33.         printf "\b\n"
  34. }
  35. }
复制代码
{:2_167:}

论坛徽章:
0
8 [报告]
发表于 2014-07-25 14:31 |只看该作者
我还是问昨夜星辰的代码好了
awk '{a[$1];for(i=1;i++<NFb[$1,i]=b[$1,i]!=""?b[$1,i]"/"$ii}END{for(i in a){printf i;for(j=1;j++<NFprintf " "b[i,j];print ""}}'
for(i=1;i++<NFb[$1,i]=b[$1,i]!=""?b[$1,i]"/"$ii这段是什么意思,不懂,请各位老师指教。

论坛徽章:
0
9 [报告]
发表于 2014-07-25 14:32 |只看该作者
晕,怎么这么多表情符号。。。

论坛徽章:
3
2015年辞旧岁徽章
日期:2015-03-03 16:54:152015年迎新春徽章
日期:2015-03-04 09:51:162015年亚洲杯之阿曼
日期:2015-04-07 20:00:59
10 [报告]
发表于 2014-07-25 15:50 |只看该作者
提示: 作者被禁止或删除 内容自动屏蔽
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP