如何簡(jiǎn)單快速計(jì)算每列的平均值

linlone

我的文件如下：

1. 
   
2. 12 34 56 78
   
3. 90 01 23 45
   
4. 67 89 90 98
   

復(fù)制代碼

想對(duì)所有列，單獨(dú)計(jì)算各列的平均值，有啥最簡(jiǎn)單的辦法沒(méi)？

jason680

回復(fù) 1# linlone

$ awk '{for(n=1;n<=NF;++n)a[n]+=$n}END{for(n=1;n<=NF;++n)$n=a[n]/NR;print}' FILE
56.3333 41.3333 56.3333 73.6667

   

moperyblue

1. echo '12 34 56 78
   
2. 90 01 23 45
   
3. 67 89 90 98'|awk '{for(i=1;i<=NF;i++)a[i]+=$i}END{for(i=1;i<=NF;i++)printf a[i]/NR (i==NF?RS:FS)}'
   
4. 56.3333 41.3333 56.3333 73.6667

復(fù)制代碼

butterflyswim

1. awk '{a+=$1;b+=$2;c+=$3;d+=$4}END{print a/NR,b/NR,c/NR,d/NR}' file

復(fù)制代碼

杰瑞26

1. 
   
2. root@localhost:~ # awk '{for(i=1;i<=NF;i++){a[i]+=$i}}END{for(i=1;i<=NF;i++)print a[i]/NR}' data_file
   
3. 56.3333
   
4. 41.3333
   
5. 56.3333
   
6. 73.6667
   

復(fù)制代碼

jcdiy0601

1. awk '{for(i=1;i<=NF;i++)a[i]+=$i}END{l=asorti(a,b);for(i=1;i<=l;i++){printf a[b[i]]/NR" "}{print ""}}' file

復(fù)制代碼

karma303

lua shell:

$` cat data.txt

1.     12 34 56 78
   
2.     90 01 23 45
   
3.     67 89 90 98
   

復(fù)制代碼

$` cat average.lua

1. #!/bin/lsh
   
2. 
   
3. vim:open("data.txt");                                    --通知vim core加載data.txt
   
4. 
   
5. for col = 0, 3 do                                           --假定有４列
   
6.         local sum = 0
   
7.         for l = 0, vim.lmax do                          --從第0行走到最后一行,以便累加算平均值
   
8.                 vim:Gn(l)        　　　　　　　　　　 --通知vim core定位到第 l 行
   
9.                 @^$(col)W|                                 --通知vim core定位到第 col 列:　^是定位到首個(gè)非空字符，然后執(zhí)行 col 次W操作
   
10.                 sum = sum + vim:atoi()        　　
    
11.         end
    
12.         print(sum / (vim.lmax + 1))
    
13. end

復(fù)制代碼

$` chmod 777 average.lua
$` ./average.lua

1. 56.333333333333
   
2. 41.333333333333
   
3. 56.333333333333
   
4. 73.666666666667

復(fù)制代碼