帮忙解释以下代码

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

1. #五折交叉验证
   
2. train=c();test=c();
   
3. for(i in 1:5){
   
4. w=randomForest(SHOCK_TYP~., data=shock[-dd[[i]],],
   
5. importance=TRUE,proximity=TRUE)
   
6. c1=t(table(predict(w),shock[-dd[[i]],6]))
   
7. c2=t(table(predict(w,shock[dd[[i]],]),shock[dd[[i]],6]))
   
8. train=c(train,sum(diag(c1))/sum(c1))
   
9. test=c(test,sum(diag(c2))/sum(c2))
   
10. }
    
11. train;mean(train)
    
12. test;mean(test)

复制代码

第一句train=()为什么要这样赋值呀？
还有train=c(train,sum(diag(c1))/sum(c1))不理解

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：randomForest importance Proximity predict import train

train=c()是为train=c(train,sum(diag(c1))/sum(c1))赋予的类型，也即是赋予其向量型，否则train=c(train,sum(diag(c1))/sum(c1))  会找不到train
train=c(train,sum(diag(c1))/sum(c1))  只是为把所有结果归于向量形式表达出来。
没什么技术内涵，你也可以用其他多种方法展示处理

问：第一句train=()为什么要这样赋值呀？
答：那是建立一个空表，将来会进行数值的不断写入。

还有train=c(train,sum(diag(c1))/sum(c1))不理解
答：在循环中不断写入数据呀

从效率上讲，这样不好，应该提前指定train的维度，
train <- rep(NA,5)
然后在循环里：
train[i] <- sum(diag(c1))/sum(c1)