使用lapply()和sapply()这两个函数,可以很方便地在列表上应用函数。
lapply()与矩阵apply()函数的用法相似,对列表(或强制转换成列表的向量)的每个组件执行给定的函数,并返回另一个列表。
> lapply( list( 1:3, 4:6, 7:9 ), median )
[[1]]
[1] 2
[[2]]
[1] 5
[[3]]
[1] 8
注:R分别对1:3、4:6和7:9求中位数,返回由2、5、8组成的列表。
在某些情况下,lapply()返回的列表可以转化为矩阵或向量形式,这时候可以选择使用sapply()函数。
> sapply( list( 1:3, 4:6, 7:9 ), median )
[1] 2 5 8