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系列,,5-wow.com

郑重声明:本站内容如果来自互联网及其他传播媒体,其版权均属原媒体及文章作者所有。转载目的在于传递更多信息及用于网络分享,并不代表本站赞同其观点和对其真实性负责,也不构成任何其他建议。