Chinaunix

标题: 求助判断第一列出现的次数打印前3行 [打印本页]
作者: nina0622    时间: 2018-06-20 18:41
标题: 求助判断第一列出现的次数打印前3行
本帖最后由 nina0622 于 2018-06-20 18:53 编辑

求助，又有一个难题，第一列会出现>=1次，如果出现3次则打印，出现3次以上则打印前三行，出现3次以下则不打印，判断有点多

cluster1160     1       3023    +      
cluster1160     3024    3602    +      
cluster1160     3603    3735    +
cluster6433     1       943     +      
cluster6433     944     2044    +      
cluster6433     2045    7569    +     
cluster6433     1       4574    +      
cluster6433     4575    5636    +      
cluster6433     5637    7569    +      
cluster6433     1       1047    +      
cluster6433     1048    7569    +      
cluster6433     1       6529    +   
cluster1159     3024    3602    +      
cluster1159     3603    3735    +


结果文件：
cluster1160     1       3023    +      
cluster1160     3024    3602    +      
cluster1160     3603    3735    +
cluster6433     1       943     +      
cluster6433     944     2044    +      
cluster6433     2045    7569    +   


谢谢


作者: lilijunhy2005    时间: 2018-06-20 18:52
支持你            
作者: 龙牙地主天    时间: 2018-06-21 09:18
本帖最后由 龙牙地主天 于 2018-06-21 11:09 编辑

回复 1# nina0622

  1. awk '{a[$1]++ ; if(a[$1]<=3) b=b?b"\n"$0:$0}END{print b}' file
复制代码

作者: baby_神    时间: 2018-06-21 10:21
  1. awk '{a[$1]++;b[NR]=$0;if(a[$1]==3){print b[NR-2]"\n"b[NR-1]"\n"b[NR]}}' a
复制代码
作者: 龙牙地主天    时间: 2018-06-21 13:37
回复 1# nina0622

  1. awk '{a[$1]++ ; if(a[$1]<=3) b=b?b"\n"$0:$0}END{print b}' file
复制代码

作者: 夏尾鱼    时间: 2018-06-21 15:43
前排来支持
作者: nina0622    时间: 2018-06-22 11:36
回复 5# 龙牙地主天

谢谢大神，不过好像漏判了一个条件
作者: wh7211    时间: 2018-06-22 11:49
回复 1# nina0622


  1. awk '!a[$1]++{if(a[b]>=3){print d};b=$1;c=d=""}{c++;d=d?c<=3?d"\n"$0:d:$0}END{if(a[b]>=3){print d}}' file
复制代码
作者: nina0622    时间: 2018-06-22 16:33
本帖最后由 nina0622 于 2018-06-22 16:37 编辑

回复 8# wh7211

谢谢大神帮助，初看有个疑问：
这个三元式如何理解呢，两个判断？三个选择？
  1. d=d?c<=3?d"\n"$0:d:$0
复制代码









作者: wh7211    时间: 2018-06-22 18:27
本帖最后由 wh7211 于 2018-06-23 12:28 编辑

回复 9# nina0622


  1. 『d=d?c<=3?d"\n"$0:d:$0』相当于下面代码：
  2. if(d){if(c<=3){d=d"\n"$0}}else{d=$0}
复制代码
作者: nina0622    时间: 2018-06-22 22:20
回复 4# baby_神

简直太秒了，谢谢大神
作者: nina0622    时间: 2018-06-22 23:20
本帖最后由 nina0622 于 2018-06-22 23:25 编辑

回复 10# wh7211

谢谢大神的耐心解答，我好好理顺了一遍，但是过程中如果稍加修改代码就出现了一点小错误，我觉得代码应该没错，可是想不明白为什么就是不行

原始的代码：

  1. awk '!a[$1]++{if(a>=3){print d};b=$1;c=d=""}{c++;d=d?c<=3?d"\n"$0:d:$0}END{if(a>=3){print d}}' file
复制代码




1. 建立数组a，并以第一列为下标。

第一行：!a[$1]++为真，此时a[$1]=1；if(a>=3) 其中b未赋值，为假，不打印d;并对b进行赋值，b=$1, c=d=""; 接着：c++, 此时c=1, if(d)为假，所以执行{d=$0}，对d进行赋值；

第二行：!a[$1]++为假，忽略第一个action; c++，此时c=2, if(d)为真，if(c<=3)为真，执行 d=d"\n"$0,此时d是两行的内容；{d=$0}不执行；

第三行：和第二行类似

若出现第一列相同的第四行，则c++, 此时c=4, if(d)为真，但是if(c<=3)为假，因此d不变，最后执行if(a>=3), 此时b=4，满足条件，打印前三行




2. 疑问：
a: 代码里的b为什么不能直接用$1代替，比如写成if(a[$1]>=3){print d}

b: awk '!a[$1]++{if(a>=3){print d};b=$1;c=d=""}{c++;if(d){if(c<=3){d=d"\n"$0}}{d=$0}}END{if(a>=3){print d}}' file


直接替换成上面的代码，理解起来是对的，但是碰到执行又错了


作者: wh7211    时间: 2018-06-23 12:42
回复 12# nina0622


a: 代码里的b为什么不能直接用$1代替，比如写成if(a[$1]>=3){print d}

d值是上一段累加的，b是上一段的$1，不是当前行的$1
b: awk '!a[$1]++{if(a>=3){print d};b=$1;c=d=""}{c++;if(d){if(c<=3){d=d"\n"$0}}{d=$0}}END{if(a>=3){print d}}' file

10楼漏掉了else关键字，已修正。完整代码：
  1. awk '!a[$1]++{if(a[b]>=3){print d};b=$1;c=d=""}{c++;if(d){if(c<=3){d=d"\n"$0}}else{d=$0}}END{if(a[b]>=3){print d}}' file
复制代码
作者: nina0622    时间: 2018-06-25 16:38
回复 13# wh7211

谢谢谢谢




欢迎光临 Chinaunix (http://bbs.chinaunix.net/) Powered by Discuz! X3.2