Chinaunix

标题: 这个行的问题如何处理 [打印本页]

作者: yqxjlf 时间: 2012-09-22 15:51
标题: 这个行的问题如何处理
file

111111 123 aaaaaa
111111 345 aaaaaa
222222 567 cccccc
333333 789 dddddd
111111 234 bbbbbb
111111 456 eeeeee

要求得到以下结果：

111111 123 aaaaaa bbbbbb
222222 567 cccccc
333333 789 dddddd

即首先去掉$1和$3重复的行(!a[$1,$3]++)，输出为

111111 123 aaaaaa
222222 567 cccccc
333333 789 dddddd
111111 234 bbbbbb
111111 456 eeeeee

第一列重复的可能有多行，只需取两行，将第二行的最后一列值放到第一列的最后生成一个新列，得到以下结果，该如何实现呢？
111111 123 aaaaaa bbbbbb
222222 567 cccccc
333333 789 dddddd

作者: kk5234 时间: 2012-09-22 22:46
没想到什么好的思路，凑合一下
awk '!a[$1$3]++{b[$1]=b[$1]?b[$1]" "$3:b[$1]" "$2" "$3}END{l=asorti(b,c);for(i=1;i<=l;i++)print c[i],b[c[i]]}' infile |awk 'NF>4{$NF=""}1'

作者: blackold 时间: 2012-09-22 23:54
try:

awk 'c[$1]>1||a[$1,$3]{next}{a[$1,$3]=1;b[$1]=b[$1]?b[$1]" "$3:$0;c[$1]++}END{for(i in b) print b[i]}' urfile

复制代码

作者: yqxjlf 时间: 2012-09-23 01:36
本帖最后由 yqxjlf 于 2012-09-23 01:46 编辑

回复 3# blackold
悲剧了，没看懂，黑哥能不能解释下啊？
c[$1]>1||a[$1,$3] 这句做什么用呢？
a[$1,$3]=1 为什么要赋值呢？
for (i in b) 也搞不明白。。

作者: blackold 时间: 2012-09-23 08:39
回复 4# yqxjlf

c[$1]>1||a[$1,$3]
c[$1] > 1 只取两行, "第一列重复的可能有多行，只需取两行"
a[$1,$3] 只取重复的第一行

a[$1,$3]=1 为什么要赋值呢？

为了去重。

for (i in b) 也搞不明白。。
遍历 b 数组。

作者: winway1988 时间: 2012-09-23 08:40

awk '!a[$1,$3]++ && b[$1]++<2{if($1 in c){c[$1]=c[$1] OFS $3}else{c[$1]=$0;d[++i]=$1}}END{for(j=1;j<=i;++j)print c[d[j]]}' urfile

复制代码

作者: yumiao5642 时间: 2012-09-23 10:23
强大的AWK.让人欢喜让人愁

作者: rdcwayx 时间: 2012-09-24 09:12
再短些。

awk 'c[$1]>1||a[$1,$3]++{next}{b[$1]=b[$1]?b[$1]" "$3:$0;c[$1]++}END{for(i in b) print b[i]}' urfile

复制代码

作者: blackold 时间: 2012-09-24 12:41
回复 8# rdcwayx

谢谢！学习！

作者: blackold 时间: 2012-09-24 13:28
还可以再短些，虽长的比较爽。

awk 'a[$1,$3]++||c[$1]++>1{next}{b[$1]=b[$1]?b[$1]" "$3:$0}END{for(i in b) print b[i]}' urfile

复制代码

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)