R语言中lapply函数用法

 

1、应用于列表

a <- c(3, 3, 7)
b <- c(1, 8)
c <- c(2, 4, 6, 3, 2)

dat <- list(a, b, c)
dat                                   ## 测试数据
lapply(dat, sum)                      ## 每一项求和， 返回列表
lapply(dat, mean)

 

 

2、应用于向量

dat <- c("aa", "bb", "DD", "ff")
dat
lapply(dat, toupper)          ## 转换为大写，返回列表
lapply(dat, tolower)

 

 

3、应用于数据框或矩阵

a <- c(2, 3, 7)
b <- c(5, 4, 2)
c <- c(2, 1, 3)
dat <- data.frame(a, b, c)
dat
lapply(dat, sum)               ## 数据框的列进行循环，返回列表