test.csv
可以用R里面的根据分组求平均值,代码如下:
data=read.csv("test.csv")group=data$TaxonomymyMeanFun<-function(x){ tapply(as.double(x),group,mean) }mydata=data[,-1]mean=apply(mydata,2,myMeanFun)write.csv(mean,file = "mean.csv")
如果觉得我的回答对您有用,请随意打赏。你的支持将鼓励我继续创作!