列表用lapply函数问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

a <- split(airquality,airquality$Month)#airquality被split函数调用，赋值到a，从data.frame变成list函数

lapply(a,function(x) colMeans(x[,c("Ozone","Wind","Temp")]
我知道colmeans函数只能作用于数据框或者矩阵，但不知道为什么用function（x）

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：apply函数 lapply apply appl App

function(x) 是直接写的一个函数，你也可以给这个函数赋值
比如先将
myfunction <- function(x) {
...
}
然后再用lapply(a,myfunction)就可以了。
a是一个包含多个data.frame的list,lapply就是针对列表里的每一个data.frame进行操作的，所以colmeans函数针对的是每个data.frame，故而是这样写的。

jiangbeilu 发表于 2017-7-16 18:54
function(x) 是直接写的一个函数，你也可以给这个函数赋值
比如先将
myfunction

谢谢大神解答