R语言中的循环函数

摘要： R语言中有几个常用的函数，可以按组对数据进行处理，apply, lapply, sapply, tapply, mapply,等。这几个函数功能有些类似，下面介绍下这几个函数的用法。 Apply 这是对一个Matrix或者Array进行某个维度的运算。

R语言中有几个常用的函数，可以按组对数据进行处理，apply, lapply, sapply, tapply, mapply,等。这几个函数功能有些类似，下面介绍下这几个函数的用法。

Apply
这是对一个Matrix或者Array进行某个维度的运算。其格式是：

Apply(数据,维度Index,运算函数,函数的参数)

对于Matrix来说，其维度值为2，第二个参数维度Index中，1表示按行运算，2表示按列运算。下面举一个例子：

m<-matrix(1:6,2,3)

构建一个简单的2行3列的矩阵，内容为：

[,1] [,2] [,3]
[1,] 1 3 5
[2,] 2 4 6

如果我们要计算每一行的sum值，那么我们可以写为：
apply(m,1,sum)

[1] 9 12

如果要计算每一列的mean值，那么改为：
apply(m,2,mean)

[1] 1.5 3.5 5.5

假如某个值为NA，那么要忽略NA值，进行每一行的SUM怎么办呢？
m[2,2]<-NA

[,1] [,2] [,3]
[1,] 1 3 5
[2,] 2 NA 6

apply(m,1,sum)

[1] 9 NA

本身sum函数有一个参数na.rm，我们可以将这个参数带人到apply函数中，作为第4个参数：
apply(m,1,sum,na.rm=TRUE)

[1] 9 8

需要注意的是如果是Data Frame，那么系统会将其转为Matrix，如果所有Column不是数字类型或者类型不一致，导致转换失败，那么apply是运算不出任何一列的结果的。

Lapply
前面说到apply是对于matrix和array的，针对list，我们可以使用lapply函数。