R语言数据操作之apply系列

 1 ###################R语言中apply类型问题

 2 data<-data.frame(x=c(1,2,3,4),y=c(2,3,4,5),z=c(5,6,7,8))

 3 apply(data,2,mean)##apply针对数据框

 4 lapply(data,mean)##lapply针对list，当然对dataframe也有效

 5 data1<-list(a=1:10,b=exp(-3:3),c=c(FALSE,FALSE,FALSE))

 6 lapply(data1，mean)##list中每个变量的长度可以是不同的

 7 sapply(data1,mean,simplify=T)

 8 #另外，还有一个vapply，里面有一个参数FUN.VALUE，对返回的结果进行检验，如果不符合要求，则会报错

 9 #tapply

10 data2<-data.frame(x=c("F","F","M","M","F"),y=c(172,176,166,188,190,163))

11 tapply(data2$y,data2$x,mean,simplify=T)##分组统计的功能,simplify为TRUE，则以列表的形式返回,FALSE则直接返回数值

12 #aggregate函数,,,分类汇总

13 attach（mtcars）

14 aggregate(mtcars,by=list(cyl,gear),FUN=mean)

R语言数据操作之apply系列