求助AWK针对两个文本的处理

kakaliu

A文件全部是手机号码

1. 
   
2. 13341001234
   
3. 13341011234
   
4. 13340981234
   
5. 13340991234
   
6. 15697291234
   
7. 15697292234
   
8. 15697301234
   

复制代码

B文件是手机号码归属地

1. 
   
2. 1334100        北京
   
3. 1334101        北京
   
4. 1334102        北京
   
5. 1334103        北京
   
6. 1334104        北京
   
7. 1334098        四川 成都市
   
8. 1334099        四川 成都市
   
9. 1569729        湖北 咸宁市
   
10. 1569730        湖南 长沙市
    
11. 1569731        湖南 长沙市
    
12. 1569732        湖南 湘潭市
    
13. 1569733        湖南 株洲市
    

复制代码

求归属地的号码的总数

如上我给了7个号码就是
北京 2
四川 成都市 2
湖北 咸宁市 2
湖南 长沙市 1


之前这样写的   发现有问题 A文件假设前7位相同 就会被当做一行数据了，所以后面匹配也就算1个了 也就是我现在的错误 求大神帮忙解决一下
awk 'NR==FNR{a[substr($0,1,7)]=1}NR>FNR{if($1 in a) b[$2" "$3]+=1}END{for(i in b) print i,b}' A.txt B.txt

北京  2
四川 成都市 2
湖北 咸宁市 1
湖南 长沙市 1

用户名注册后不能更改

试试先处理B，用一个数组把前7位和所在地关联起来，再处理A。

expert1

match就好了啊，不用substring.

匹配一次，a[$x]++一次。

reyleon

1. awk 'NR==FNR{t=$1;$1="";a[t]=$0;next}{p=substr($1,1,7);b[a[p]]++}END{for(i in b)print i,b[i]}'  B.txt A.txt

复制代码

关阴月飞

1. awk 'FNR==NR{++a[substr($0,1,7)]}a[$1]{b[$2FS$3]+=a[$1]}END{for(i in b)print i,b[i]}' a b

复制代码

kakaliu

回复 4# reyleon


    六子真有速度 谢谢！可用

kakaliu

回复 5# 关阴月飞


    可以用 谢谢~

li0924

1. awk 'NR==FNR{a[$1]=$2;next}{t=substr($0,1,7);b[a[t]]++}END{for(i in b)print i,b[i]}' b a

复制代码

seesea2517

回复 1# kakaliu

咦，这个统计值在前面，怎么弄到后面呢。。。

1. [seesea@UC ~]$ uniq -c <( join -o2.2 2.3 <( sort <(cut -c 1-7 A) ) <( sort B ) )
   
2.       2 四川 成都市
   
3.       2 北京
   
4.       2 湖北 咸宁市
   
5.       1 湖南 长沙市

复制代码

用户名注册后不能更改

回复 9# seesea2517

rev