各行の平均を計算する方法(各行の最初の値を除く)は何ですか?

各行の平均を計算する方法(各行の最初の値を除く)は何ですか?

各行の平均を計算しますが、最初の値は除外します。例:

1   12 13 14 15 16 17 18   
2   21 22 23 24 25 26 27 28 29     
... --------

私が望む出力は次のとおりです。

1  15   
2  25   
....

ベストアンサー1

一つずつperl:

perl -MList::Util=sum -ane 'printf "%s %s\n", shift @F, sum(@F)/(@F?@F:1)' file
1 15
2 25

おすすめ記事