免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
12
最近访问板块 发新帖
楼主: filwy
打印 上一主题 下一主题

有一个统计,麻烦大家看看 [复制链接]

论坛徽章:
0
11 [报告]
发表于 2008-01-16 18:48 |只看该作者

  1. awk '{
  2. a[$1" "$3]++
  3. }END{
  4. for(i in a){
  5.     d=(substr(i,1,3)==c)?"\040\040\040\040"substr(i,5):i
  6.     print d,a[i];c=substr(i,1,3)
  7.     }
  8. }' a.txt

复制代码

[ 本帖最后由 davistar 于 2008-1-16 18:50 编辑 ]

论坛徽章:
23
15-16赛季CBA联赛之吉林
日期:2017-12-21 16:39:27白羊座
日期:2014-10-27 11:14:37申猴
日期:2014-10-23 08:36:23金牛座
日期:2014-09-30 08:26:49午马
日期:2014-09-29 09:40:16射手座
日期:2014-11-25 08:56:112015年辞旧岁徽章
日期:2015-03-03 16:54:152015年迎新春徽章
日期:2015-03-04 09:49:0315-16赛季CBA联赛之山东
日期:2017-12-21 16:39:1915-16赛季CBA联赛之广东
日期:2016-01-19 13:33:372015亚冠之山东鲁能
日期:2015-10-13 09:39:062015亚冠之西悉尼流浪者
日期:2015-09-21 08:27:57
12 [报告]
发表于 2008-01-17 09:53 |只看该作者
原帖由 seeLnd 于 2008-1-16 18:29 发表
awk '{a=$1;$1="\t";b[a]=$0"\n"b[a]} END{for(i in b)printf "%s%s",i,b}' b.txt


学习了!

原帖由 davistar 于 2008-1-16 18:48 发表

awk '{
a[$1" "$3]++
}END{
for(i in a){
    d=(substr(i,1,3)==c)?"\040\040\040\040"substr(i,5):i
    print d,a;c=substr(i,1,3)
    }
}' a.txt


davistar兄的这个好象不行,for(i in a)这个出来的i应该是乱序的。

论坛徽章:
0
13 [报告]
发表于 2008-01-21 09:36 |只看该作者
谢谢各位。。谢谢·!

[ 本帖最后由 filwy 于 2008-1-21 10:13 编辑 ]

论坛徽章:
0
14 [报告]
发表于 2008-01-21 11:02 |只看该作者

  1. awk '{a[$1]=1;b[$1,$3]++}
  2. END{
  3.         for(i in a){
  4.                 printf i
  5.                 for(k in b)
  6.                         if(k~"^"i) printf "\t%s\t%d\n",substr(k,length(i)+1),b[k]
  7.         }
  8. }' 数据文件
复制代码

论坛徽章:
0
15 [报告]
发表于 2008-01-21 17:48 |只看该作者
  1. [root@mymail tmp]# cat s
  2. 222 13881 211.155.16.10
  3. 222 13882 211.155.16.11
  4. 222 13883 211.155.16.11
  5. 222 13884 211.155.16.10
  6. 222 13885 211.155.16.11
  7. 222 13886 211.155.16.33
  8. 222 13887 211.155.22.33
  9. 333 12887 222.222.222.2
  10. 333 13911 222.222.222.2
  11. 444 13991 222.111.111.1
  12. 444 13992 222.222.2.111
  13. 444 13993 222.222.2.333
  14. 444 13994 222.222.2.333
  15. [root@mymail tmp]# awk '{a[$1" "$3]++}END{for(i in a) print i,a[i]}' s
  16. 12 211.155.16.33
  17. 22 211.155.16.10
  18. 32 211.155.16.11
  19. 14 222.222.2.111
  20. 23 222.222.222.2
  21. 14 222.111.111.1
  22. 24 222.222.2.333
  23. 12 211.155.22.33
  24. [root@mymail tmp]# awk '{a[$1" "$3]++}END{for(i in a) print i}' s
  25. 222 211.155.16.33
  26. 222 211.155.16.10
  27. 222 211.155.16.11
  28. 444 222.222.2.111
  29. 333 222.222.222.2
  30. 444 222.111.111.1
  31. 444 222.222.2.333
  32. 222 211.155.22.33


  33. 我的咋这样,如果用了a[i] 就输出覆盖了前两位.
复制代码

[ 本帖最后由 神奇天鹅 于 2008-1-21 18:05 编辑 ]
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP