根据第一列号码，每个号码输出三行

eatmyshort

根据第一列号码，输出3行内容，号码次数小于三次不输出，大于三次的只输出三行。例如

13004459222,17768600234
13004459222,18115297222
13004459222,13376022615
13004459222,17768607266
13023528678,17312879102
13023528678,13327826950
13023528678,15365429096
13023528678,18151466626
13063864066,17715367077
13063864066,18962580063
13063864066,13372160307
13063864066,13382541575
13063864066,18115519219

输出为：
13004459222,17768600234
13004459222,18115297222
13004459222,13376022615
13023528678,17312879102
13023528678,13327826950
13023528678,15365429096
13063864066,17715367077
13063864066,18962580063
13063864066,13372160307

文本.zip (906 Bytes, 下载次数: 6)

2016-06-12 10:44 上传

点击文件名下载附件

zxy877298415

回复 1# eatmyshort

1. awk -F, '{if(!a[$1]) {t=0;a[$1]=1} b[++t]=$0;if(t==3) {for(i=1;i<=t;i++) {print b[i]}} }' file

复制代码

haooooaaa

1. awk -F, 'a[$1]>2&&b{printf b;b="";c[$1]++}!c[$1]{a[$1]++;b=b $0"\n"}' file

复制代码

关阴月飞

1. awk -F, 'FNR==NR{a[$1]++;next}a[$1]>=3&&b[$1]++<3'  file file

复制代码

sunzhiguolu

1. perl -F/,/ -ane '{$h{$F[0]}{"Count"}++;push(@{$h{$F[0]}{"Values"}},$_)}END{print @{$h{$_}{"Values"}}[0..2] for sort grep {$h{$_}{"Count"} > 3} keys %h}' f

复制代码

13004459222,17768600234
13004459222,18115297222
13004459222,13376022615
13023528678,17312879102
13023528678,13327826950
13023528678,15365429096
13063864066,17715367077
13063864066,18962580063
13063864066,13372160307

hz_oracle

awk -F, 'a[$1]++<3' file