R语言循环中忽略错误.docVIP

R语言中忽略循环的错误 对多种类的数据使用同一模型/函数时,容易出现各种各样的错误,下面是忽略模型错误的方法: x.inv - try(函数/模型表达式, silent=TRUE) if (try-error %in% class(x.inv)) next 例子1: count - 0 inverses - vector(mode = list, 100) repeat { if (count == 100) break count - count + 1 x - matrix(sample(0:2, 4, replace = T), 2, 2) x.inv - try(solve(x), silent=TRUE) if (try-error %in% class(x.inv)) next else inverses[[count]] - x.inv print(count) } 例子2 gam模型 library(recharts) source(echartR.R) qdata=read.csv(alldata.csv,header = T,sep=,) qdata=na.omit(qdata) dim(qdata) write.csv(qdata,qdata.csv) table(qdata$SUMTYPENAME) neddata=qdata[q