摘要： 将异常数据提取出来统一放到一个CSV文件里。供后期分析用errNum<-function(){ hNum = nlevels(KA$H)redata<-data.frame()a <-data.frame()for( i in 1:hNum){data<-subset(KA,H==KA$H[i])r... 阅读全文