R语言中lapply函数

 

相对于apply， lapply主要应用于list ？？ 返回list？？

 

001、应用于数据框

dat <- data.frame(a = c(6, 3, 5), b = c(2, 6, 8), c = c(5, 2, 1))     ## 测试数据框
dat
lapply(dat, min)                                                      ## 返回最小值
lapply(dat, max)                                                      ## 返回最大值

 

 

dat <- data.frame(a = c(6, 3, 5), b = c(2, 6, 8), c = c(5, 2, 1))
dat
lapply(dat, function(x) sum(x > 5))               ## 输出每一列中大于5的个数

 

 

002、应用于列表

dat <- list(a = c(6, 3, 5), b = c(2, 6, 8), c = c(5, 2, 1))    ## 测试列表
dat
lapply(dat,  max)