awk 統(tǒng)計

z421941982

現(xiàn)有文件內(nèi)容如下:

1. a        111
   
2. b        111
   
3. c        111
   
4. d        111
   
5. b        222
   
6. c        222
   
7. d        222

復(fù)制代碼

文件中第一列為文本(名稱), 第二列為數(shù)值(金額), 現(xiàn)想得到以下結(jié)果:

1. a b 1
   
2. a c 1
   
3. a d 1
   
4. b a 1
   
5. b c 2
   
6. b d 2
   
7. c a 1
   
8. c b 2
   
9. c d 2
   
10. d a 1
    
11. d b 2
    
12. d c 2

復(fù)制代碼

統(tǒng)計規(guī)則如下:
a c 1  意思為:  第一列的名稱中 a 與 c 在第二列的金額 相等的 記錄有 1個. ( 注 根據(jù)文件中 第1行記錄和第3行記錄 得到的結(jié)果)
b c 2  意思為:  第一列的名稱中 b 與 c 在第二列的金額 相等的 記錄有 2個. ( 注 根據(jù)文件中 第2,3行記錄和第5,6行記錄 得到的結(jié)果)

dahaoshanhe

沒看明白是下面這個意思不？
先把文件復(fù)制一下 cp f1 f2

1. awk 'NR==FNR{a[$1" "$2]=$0;next}
   
2. {
   
3.    for(i in a)
   
4.       {
   
5. print a[i],"   "$0
   
6.        }
   
7.   }' f1 f2  |
   
8. awk '
   
9. {
   
10.   if($2==$4)
    
11.     {print $1,$3,"1"}
    
12.    else
    
13.    {print $1,$3," 2" }
    
14. }'  
    
15. d  a  1
    
16. c  a  1
    
17. d  a  2
    
18. b  a  1
    
19. c  a  2
    
20. a  a  1
    
21. b  a  2
    
22. d  b  1
    
23. c  b  1
    
24. d  b  2
    
25. b  b  1
    
26. c  b  2
    
27. a  b  1
    
28. b  b  2
    
29. d  c  1
    
30. c  c  1
    
31. d  c  2
    
32. b  c  1
    
33. c  c  2
    
34. a  c  1
    
35. b  c  2
    
36. d  d  1
    
37. c  d  1
    
38. d  d  2
    
39. b  d  1
    
40. c  d  2
    
41. a  d  1
    
42. b  d  2
    
43. d  b  2
    
44. c  b  2
    
45. d  b  1
    
46. b  b  2
    
47. c  b  1
    
48. a  b  2
    
49. b  b  1
    
50. d  c  2
    
51. c  c  2
    
52. d  c  1
    
53. b  c  2
    
54. c  c  1
    
55. a  c  2
    
56. b  c  1
    
57. d  d  2
    
58. c  d  2
    
59. d  d  1
    
60. b  d  2
    
61. c  d  1
    
62. a  d  2
    
63. b  d  1
    

復(fù)制代碼

z421941982

回復(fù) 2# dahaoshanhe


你寫這個我也沒看懂， 干嘛把文件拷成兩份？

   

huangyu_945

呵呵  沒看懂正常

davidbeckham921

感覺很難的樣子，要用二維數(shù)組和倆循環(huán)判斷才能輸出來樓主想要的。

davidbeckham921

1. awk '{a[$1]++;b[$1,a[$1]-1]=$2;a[$1]>m?m=a[$1]:m=m}0END{for(i in a) for (j in a) for(k=0;k<=m;k++)if( i!=j && b[i,k]==b[j,k] && b[i,k]!="") printf "%s\t%s\t%s\n",i,j,b[j,k]}' urfile\
   
2. |awk '{a[$1" "$2]++}END{for(i in a)print i" "a[i]}'

復(fù)制代碼

寫完已經(jīng)大小便失禁，生活不能自理了，求高手簡化。

如果沒有理解錯你的意思的話結(jié)果應(yīng)該是，跟你期望的結(jié)果稍有偏差，感覺你給的答案是不對的。比如：b d 都有111和222，所以應(yīng)該是 b d 2
a b 1
a c 1
a d 1
b a 1
b c 2
b d 2
c a 1
c b 2
c d 2
d a 1
d b 2
d c 2

求高手解釋，能否把管道后的awk合并到前面？！倆END怎么搞？！

yestreenstars

我也來寫一個吧

1. awk '{a[$1];b[$2];c[$1""$2]}END{for(i in a){for(j in a){if(i!=j){for(k in b){if((i""k in c)&&(j""k in c))n++}print i,j,n;n=""}}}}'

復(fù)制代碼

運行結(jié)果如下：

1. [root@localhost ~]# cat i
   
2. a        111
   
3. b        111
   
4. c        111
   
5. d        111
   
6. b        222
   
7. c        222
   
8. d        222
   
9. [root@localhost ~]# awk '{a[$1];b[$2];c[$1""$2]}END{for(i in a){for(j in a){if(i!=j){for(k in b){if((i""k in c)&&(j""k in c))n++}print i,j,n;n=""}}}}' i
   
10. a b 1
    
11. a c 1
    
12. a d 1
    
13. b a 1
    
14. b c 2
    
15. b d 2
    
16. c a 1
    
17. c b 2
    
18. c d 2
    
19. d a 1
    
20. d b 2
    
21. d c 2
    
22. [root@localhost ~]#

復(fù)制代碼

z421941982

回復(fù) 6# davidbeckham921
  你的答案是正確的, 要的就是這個結(jié)果



   

z421941982

回復(fù) 7# yestreenstars


    神一樣的代碼, 看一遍都暈了, 就是要這個結(jié)果!!!

dahaoshanhe

回復(fù) 8# z421941982


    你的問題寫的還沒有人家給出正確答案的人寫的代碼好懂  神呀你