tính trung bình sử dụng awk từ nhiều tệp

Question

Tôi có 500 tệp có tên fort.1, fort.2 ... fort.500. Mỗi tập tin chứa dữ liệu 800 điểm như sau:

1 0,485
2 0,028
3 0,100
4 0,979
5 0,338
6 0,891
7 0,415
8 0,368
9 0,245
10 0.489

Tôi muốn lấy trung bình của mỗi dòng của cột thứ hai từ mỗi tệp. Nói cách khác, lấy trung bình của dòng thứ hai cột đầu tiên từ tất cả các tập tin và lưu trữ trong "output.file". Sau đó nhận được trung bình của cột thứ hai của dòng thứ hai và lưu trữ trong cùng một "output.file". Tôi đã thử với lệnh dán nhưng không nhận được những gì tôi muốn. Có cách nào để thực hiện trong AWK không?

Đánh giá cao sự trợ giúp. Cảm ơn

Answer 1

Sự hiểu biết của tôi: mỗi tệp là một tập hợp các phép đo tại một vị trí cụ thể. Bạn muốn tổng hợp các phép đo trên tất cả các vị trí, tính trung bình giá trị của cùng một hàng trong mỗi tệp vào một tệp mới.

Giả sử cột đầu tiên có thể được coi là một ID cho hàng (và có 800 phép đo trong một tập tin):

cat fort.* | awk ' 
BEGIN { 
    for (i = 1; i <= 800; i++) 
     total[i] = 0 
} 

{ total[$1] += $2 } 

END { 
    for (i = 1; i <= 800; i++) 
     print i, total[i]/500 
} 
' 

tiên, chúng ta khởi tạo một mảng để lưu trữ tổng cho một hàng trên tất cả các các tập tin.

Sau đó, chúng tôi lặp qua các tệp được ghép nối. Chúng tôi sử dụng cột đầu tiên làm khóa cho hàng và chúng tôi tổng hợp vào mảng.

Cuối cùng, chúng tôi lặp qua mảng và in giá trị trung bình theo hàng trên tất cả các tệp.

Answer 2

Giả sử cột đầu tiên là một ID:

cat fort.* | awk '{sum[$1] += $2; counts[$1]++;} END {for (i in sum) print i, sum[i]/counts[i];}' 

Answer 3

Dưới đây là một cách nhanh chóng sử dụng paste và awk:

paste fort.* | awk '{ for(i=2;i<=NF;i+=2) array[$1]+=$i; if (i = NF) print $1, array[$1]/NF*2 }' > output.file 

Giống như một số các câu trả lời khác; đây là một cách khác nhưng điều này sử dụng sort để có được đầu ra số lượng sắp xếp:

awk '{ sum[$1]+=$2; cnt[$1]++ } END { for (i in sum) print i, sum[i]/cnt[i] | "sort -n" }' fort.* 

Answer 4

awk mà không cần bất kỳ giả định trên cột 1:

awk '{a[FNR]+=$2;b[FNR]++;}END{for(i=1;i<=FNR;i++)print i,a[i]/b[i];}' fort.*