linux awk命令实现统计每行数据的总和、平均值

1、测试数据

root@PC1:/home/test# ls
test.txt
root@PC1:/home/test# cat test.txt
3 4 2 2
1 9 5 7
5 7 8 4
2 3 4 6

2、实现计算每行的和

root@PC1:/home/test# ls
test.txt
root@PC1:/home/test# cat test.txt
3 4 2 2
1 9 5 7
5 7 8 4
2 3 4 6
root@PC1:/home/test# awk 'BEGIN{sum = 0}{for(i = 1; i <= NF; i++) {sum += $i} {print sum; sum = 0}}' test.txt > sum.txt
root@PC1:/home/test# ls
sum.txt  test.txt
root@PC1:/home/test# cat sum.txt  ## 每行数据的和
11
22
24
15

3、实现计算每行数据的平均数

root@PC1:/home/test# ls
test.txt
root@PC1:/home/test# cat test.txt
3 4 2 2
1 9 5 7
5 7 8 4
2 3 4 6
root@PC1:/home/test# awk 'BEGIN{sum = 0} {for(i = 1; i <= NF; i++) {sum += $i} {print sum/NF; sum = 0}}' test.txt > mean.txt
root@PC1:/home/test# ls
mean.txt  test.txt
root@PC1:/home/test# cat mean.txt  每行数据的平均数
2.75
5.5
6
3.75

4、R实现

dir()
dat <- read.table("test.txt", header = F)
dat
apply(dat, 1, sum)
apply(dat, 1, mean)

> dir()
[1] "test.txt"
> dat <- read.table("test.txt", header = F)  ## 读取测试数据
> dat
  V1 V2 V3 V4
1  3  4  2  2
2  1  9  5  7
3  5  7  8  4
4  2  3  4  6
> apply(dat, 1, sum)   ## 每行的和
[1] 11 22 24 15
> apply(dat, 1, mean)  ## 每行的平均数
[1] 2.75 5.50 6.00 3.75