我想在R中运行100次randomForest
回归,为每次运行获取变量重要性,并将变量重要性的结果写为csv文件(包括100个变量重要性的结果)。这是我的代码及其错误:
result<-data.frame(IncMSE="%IncMSE", IncNodePurity="IncNodePurity")
for (i in 1:3){
imp[i]<- importance(randomForest(train[,1:11], train[,12], data = train,importance = TRUE, ntree =5000, proximity = TRUE, mtry=3))
results<-cbind(result,imp[i])
}
write.csv(results,"D:/vari.csv")
Warning messages:
In imp[i] <- importance(randomForest(train[, 1:11], train[, 12], :
number of items to replace is not a multiple of replacement length
如何解决?非常感谢。
答案 0 :(得分:2)
有一些小事,rbind
代替cbind
,result
与results
,names()
冲突,对未定义对象建立索引{ {1}}等等:
imp