R语言中lapply函数的用法

 

001、

> a <- c(5, 2, 7, 4)
> b <- c(3, 8, 6, 5)
> c <- c(7, 1, 6, 3)
> dat <- list(a, b, c)       ## 生成测试列表
> dat
[[1]]
[1] 5 2 7 4

[[2]]
[1] 3 8 6 5

[[3]]
[1] 7 1 6 3

> lapply(dat, min)           ## 输出列表对象的最小值， 返回类型为列表
[[1]]
[1] 2

[[2]]
[1] 3

[[3]]
[1] 1

> lapply(dat, sum)           ## 输出列表每一项的和， 返回类型为列表
[[1]]
[1] 18

[[2]]
[1] 22

[[3]]
[1] 17