apply函数经常用来计算矩阵中行或列的均值、和值的函数,具体方法如下:
apply(x,计算行或列数字代码,函数),详见例子:
> b
first second
one 1 2
two 3 4
three 5 6
> apply(b,1,sum)#第一个参数表示要计算的矩阵,第二个参数1表示计算每一行,第三个参数是要计算每一行的函数,这里是求每一行的和。
one two three
3 7 11
> apply(b,2,sum)#表示求每一列的和。
first second
9 12
> d<-array(1:24,dim=c(2,3,4))
> d
, , 1
[,1] [,2] [,3]
[1,] 1 3 5
[2,] 2 4 6
, , 2
[,1] [,2] [,3]
[1,] 7 9 11
[2,] 8 10 12
, , 3
[,1] [,2] [,3]
[1,] 13 15 17
[2,] 14 16 18
, , 4
[,1] [,2] [,3]
[1,] 19 21 23
[2,] 20 22 24
> apply(d,3,sum)#表示求每一维的和,一个维度为一个矩阵,即这个维度的每个元素相加之和。
[1] 21 57 93 129
>