R语言中apply函数的用法

 

001、

> c1 <- c(8, 2, 9, 3)
> c2 <- c(6, 3, 7, 4)
> c3 <- c(3, 1, 7, 6)
> dat <- cbind(c1, c2, c3)
> dat          ## 测试数据， 为数据框
     c1 c2 c3
[1,]  8  6  3
[2,]  2  3  1
[3,]  9  7  7
[4,]  3  4  6
> apply(dat, 1, max)       ## 返回每一行中的最大值
[1] 8 3 9 6
> apply(dat, 2, max)       ## 返回每一列中的最大值
c1 c2 c3 
 9  7  7 
> apply(dat, 1, sum)       ## 返回每一行的和
[1] 17  6 23 13
> apply(dat, 2, sum)       ## 返回每一列的和
c1 c2 c3 
22 20 17 

其中的max、sum可以改为其他任意的函数。