列表用lapply函数问题

1297

收藏 2017-07-16

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

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

扫码加我拉你入群

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

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

全部回复

jiangbeilu

2017-7-16 18:54:31

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

扫码加我拉你入群

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

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

Thanos123

2017-7-16 20:59:45

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

谢谢大神解答

扫码加我拉你入群

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

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

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群