awk 数据处理求风骚代码

csccyab

$ cat 1
85  92  78  94  88
89  90  75  90  86
84  88  90  92  84

$ awk '{max=min=$1; for(i=2; i<=NF; i++){max=max<$i?$i:max; min=min>$i?$i:min} printf "max=%d, min=%d\n", max, min}' 1
max=94, min=78
max=90, min=75
max=92, min=84

baby_神

1. # perl -MList::Util=sum,min,max -alne '$,=" ";$a=max @F; $b=min @F; $c=sum @F ;print $a,$b,$c/@F' b   
   
2. 94 78 87.4
   
3. 90 75 86
   
4. 92 84 87.6

复制代码

龙牙地主天

回复 1# wangergui2018

1. awk '{a=b=$1;for(i=1;i<=NF;i++){a=a<$i?$i:a;b=b>$i?$i:b;c+=$i;d[i]=d[i]<$i?$i:d[i];e[i]=e[i]<$i&&e[i]?e[i]:$i;f[i]+=$i} print NR"行",a,b,c/NF;c=cc}END{for(j=1;j<=NF;j++) print j"列",d[j],e[j],f[j]/NR}' file

复制代码

1cpuer

回复 4# 龙牙地主天

c+=$i
c=cc
c是合计total
为何c=cc

龙牙地主天

回复 5# 1cpuer

清空c

1cpuer

回复 6# 龙牙地主天

# 2018-10-08 12:38:00 1538973480 bash:!4230!:/mnt/i/je-d/sou-d
# awk '{a=b=$1;for(i=1;i<=NF;i++){a=a<$i?$i:a;b=b>$i?$i:b;c+=$i;d=d<$i?$i:d;e=e<$i&&e?ei;f+=$i} print NR"行",a,b,c/NF;c=cc}END{for(
j=1;j<=NF;j++) print j"列",d[j],e[j],f[j]/NR}' file
1行 94 78 87.4
2行 90 75 86
3行 92 84 87.6
1列 89 84 86
2列 92 88 90
3列 90 75 81
4列 94 90 92
5列 88 84 86
# 2018-10-08 12:38:52 1538973532 bash:!4231!:/mnt/i/je-d/sou-d
# awk '{a=b=$1;for(i=1;i<=NF;i++){a=a<$i?$i:a;b=b>$i?$i:b;c+=$i;d=d<$i?$i:d;e=e<$i&&e?ei;f+=$i} print NR"行",a,b,c/NF;c=""}END{for(
j=1;j<=NF;j++) print j"列",d[j],e[j],f[j]/NR}' file
1行 94 78 87.4
2行 90 75 86
3行 92 84 87.6
1列 89 84 86
2列 92 88 90
3列 90 75 81
4列 94 90 92
5列 88 84 86
# 2018-10-08 12:39:06 1538973546 bash:!4232!:/mnt/i/je-d/sou-d
# awk '{a=b=$1;for(i=1;i<=NF;i++){a=a<$i?$i:a;b=b>$i?$i:b;c+=$i;d=d<$i?$i:d;e=e<$i&&e?ei;f+=$i} print NR"行",a,b,c/NF;c=c}END{for(j
=1;j<=NF;j++) print j"列",d[j],e[j],f[j]/NR}' file
1行 94 78 87.4
2行 90 75 173.4
3行 92 84 261
1列 89 84 86
2列 92 88 90
3列 90 75 81
4列 94 90 92
5列 88 84 86


可以理解清空c