免费注册 查看新帖 |

Chinaunix

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

[文本处理] 怎样把长度不一的行转换为矩阵 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2013-06-22 06:16 |只看该作者 |倒序浏览
比如说我有一个文件
1 2 3 4 5
2 3 7
2 4 2 3 5 6 8 7
3 4 5 7 8
我想把它变成各行长度一样的矩阵,空白处用 0 填充,得到结果如下:
1 2 3 4 5 0 0 0
2 3 7 0 0 0 0 0
2 4 2 3 5 6 8 7
3 4 5 7 8 0 0 0
可以直接得到吗?或者通过预处理已经知道最长的行包含8个字段,该怎么做呢?

论坛徽章:
2
射手座
日期:2014-10-10 15:59:4715-16赛季CBA联赛之上海
日期:2016-03-03 10:27:14
2 [报告]
发表于 2013-06-22 10:02 |只看该作者
本帖最后由 yinyuemi 于 2013-06-22 10:04 编辑
  1. awk 'NR=FNR{if(len < NF)len=NF;next}{for(i=NF;i++<=len;;)$0=$0 FS "0"}1' file file
复制代码

论坛徽章:
13
丑牛
日期:2013-08-16 15:08:22技术图书徽章
日期:2013-11-26 10:13:40双鱼座
日期:2013-11-08 15:03:26戌狗
日期:2013-11-08 13:52:30技术图书徽章
日期:2013-11-05 14:06:30戌狗
日期:2013-10-31 11:45:42CU十二周年纪念徽章
日期:2013-10-24 15:41:34天秤座
日期:2013-10-11 14:55:08子鼠
日期:2013-09-26 19:36:35水瓶座
日期:2013-09-26 17:44:56午马
日期:2013-08-26 10:24:23丑牛
日期:2013-08-19 14:43:22
3 [报告]
发表于 2013-06-22 10:24 |只看该作者
本帖最后由 代号:军刀 于 2013-06-22 10:25 编辑
  1. awk '{a[NR]=$0;t=t>NF?t:NF}END{for(i=1;i<=NR;i++){for(j=length(a[i]);j<2*t-1;j+=2){a[i]=a[i]" "0;}print a[i]}}'
复制代码

论坛徽章:
50
15-16赛季CBA联赛之广夏
日期:2018-11-05 09:42:462015年亚冠纪念徽章
日期:2015-07-23 11:58:122015亚冠之广州富力
日期:2015-07-07 08:26:172015亚冠之塔什干棉农
日期:2015-06-29 09:08:072015年亚洲杯之伊朗
日期:2015-03-08 20:51:012015年迎新春徽章
日期:2015-03-04 09:58:11未羊
日期:2014-10-16 22:41:47处女座
日期:2014-10-16 15:33:33酉鸡
日期:2014-03-13 12:54:10巳蛇
日期:2014-03-10 14:39:052015亚冠之德黑兰石油
日期:2015-07-29 12:46:372015亚冠之德黑兰石油
日期:2015-08-07 12:54:11
4 [报告]
发表于 2013-06-22 11:34 |只看该作者
  1. awk '{for(i=0;i++<=NF;)a[NR,i]=$i;l=l<NF?NF:l}END{for(i=0;i++<NR;){for(j=0;j++<l;)printf a[i,j]?a[i,j]" ":0" ";print a[i,j]}}' file
复制代码

论坛徽章:
50
15-16赛季CBA联赛之广夏
日期:2018-11-05 09:42:462015年亚冠纪念徽章
日期:2015-07-23 11:58:122015亚冠之广州富力
日期:2015-07-07 08:26:172015亚冠之塔什干棉农
日期:2015-06-29 09:08:072015年亚洲杯之伊朗
日期:2015-03-08 20:51:012015年迎新春徽章
日期:2015-03-04 09:58:11未羊
日期:2014-10-16 22:41:47处女座
日期:2014-10-16 15:33:33酉鸡
日期:2014-03-13 12:54:10巳蛇
日期:2014-03-10 14:39:052015亚冠之德黑兰石油
日期:2015-07-29 12:46:372015亚冠之德黑兰石油
日期:2015-08-07 12:54:11
5 [报告]
发表于 2013-06-22 11:38 |只看该作者
本帖最后由 WilliBhamlll 于 2013-06-22 11:40 编辑

回复 2# yinyuemi

好方法,学习了。不过代码漏了点东西
  1. awk 'NR==FNR{if(len < NF)len=NF;next}{for(i=NF;i++<len;)$0=$0 FS "0"}1' file file
复制代码

论坛徽章:
0
6 [报告]
发表于 2013-06-23 21:37 |只看该作者
WilliBhamlll 发表于 2013-06-22 11:38
回复 2# yinyuemi

好方法,学习了。不过代码漏了点东西


漏了哪啊?怎么改?

论坛徽章:
4
白羊座
日期:2013-09-17 21:59:30技术图书徽章
日期:2013-10-12 22:16:03白羊座
日期:2013-10-14 11:01:40双子座
日期:2013-12-17 18:26:39
7 [报告]
发表于 2013-06-23 22:27 |只看该作者
回复 6# hxletter
你楼上的帖子中已经改了
NR=FNR 改为 NR==FNR

   

论坛徽章:
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
8 [报告]
发表于 2013-06-24 09:30 |只看该作者
  1. [root@localhost ~]# awk '{for(i=1;i<=8;i++)if($i=="")$i=0}1' i
  2. 1 2 3 4 5 0 0 0
  3. 2 3 7 0 0 0 0 0
  4. 2 4 2 3 5 6 8 7
  5. 3 4 5 7 8 0 0 0
  6. [root@localhost ~]#
复制代码

论坛徽章:
0
9 [报告]
发表于 2013-06-24 19:34 |只看该作者
回复 5# WilliBhamlll

没看明白,可以解释下吗?
NR==FNR是干什么用的?
   

论坛徽章:
13
丑牛
日期:2013-08-16 15:08:22技术图书徽章
日期:2013-11-26 10:13:40双鱼座
日期:2013-11-08 15:03:26戌狗
日期:2013-11-08 13:52:30技术图书徽章
日期:2013-11-05 14:06:30戌狗
日期:2013-10-31 11:45:42CU十二周年纪念徽章
日期:2013-10-24 15:41:34天秤座
日期:2013-10-11 14:55:08子鼠
日期:2013-09-26 19:36:35水瓶座
日期:2013-09-26 17:44:56午马
日期:2013-08-26 10:24:23丑牛
日期:2013-08-19 14:43:22
10 [报告]
发表于 2013-06-24 19:51 |只看该作者
回复 9# hxletter


    就是读取file file的第一个file
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP