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
>