R语言学习笔记 - 2 split、lapply和do.calld实现分组求平均

head(iris)

#数据分组
iris.split <- split(iris,as.factor(iris$Species))

#数据分组计算平均值
iris.apply <- lapply(iris.split,function(x)colMeans(x[-5]))

# 组合结果
iris.combine <- do.call(rbind,iris.apply)
iris.combine