求问随机森林定义训练集和测试集后拟合报错的问题-经管之家官网!

人大经济论坛-经管之家 收藏本站
您当前的位置> 会计>>

会计库

>>

求问随机森林定义训练集和测试集后拟合报错的问题

求问随机森林定义训练集和测试集后拟合报错的问题

发布:13944604395 | 分类:会计库

关于本站

人大经济论坛-经管之家:分享大学、考研、论文、会计、留学、数据、经济学、金融学、管理学、统计学、博弈论、统计年鉴、行业分析包括等相关资源。
经管之家是国内活跃的在线教育咨询平台!

经管之家新媒体交易平台

提供"微信号、微博、抖音、快手、头条、小红书、百家号、企鹅号、UC号、一点资讯"等虚拟账号交易,真正实现买卖双方的共赢。【请点击这里访问】

提供微信号、微博、抖音、快手、头条、小红书、百家号、企鹅号、UC号、一点资讯等虚拟账号交易,真正实现买卖双方的共赢。【请点击这里访问】

代码如下:library(xlsx)data<-read.xlsx2(file="C:/ProgramFiles/R/R-3.5.1/2251.xlsx",sheetIndex=1)library(randomForest)ind<-sample(2,nrow(data),replace=TRUE,prob=c(0.7,0.3))traindata<-data[ind ...
坛友互助群


扫码加入各岗位、行业、专业交流群


代码如下:
library(xlsx)
data <- read.xlsx2(file="C:/Program Files/R/R-3.5.1/2251.xlsx",sheetIndex=1)
library(randomForest)
ind <- sample(2, nrow(data), replace=TRUE, prob=c(0.7, 0.3))
traindata <- data[ind==1,]
testdata <- data[ind==2,]
traindataX1<-traindata[,1]
traindataX1<-as.factor(traindataX1)
traindataX2<-traindata[,2]
traindataX2<-as.factor(traindataX2)
traindataX3<-traindata[,3]
traindataX3<-as.factor(traindataX3)
traindataX4<-traindata[,4]
traindataX4<-as.factor(traindataX4)
traindataX5<-traindata[,5]
traindataX5<-as.factor(traindataX5)
traindataX6<-traindata[,6]
traindataX6<-as.factor(traindataX6)
traindataX7<-traindata[,7]
traindataX7<-as.factor(traindataX7)
traindataX8<-traindata[,8]
traindataX8<-as.factor(traindataX8)
traindataX9<-traindata[,9]
traindataX9<-as.factor(traindataX9)
traindataX10<-traindata[,10]
traindataX10<-as.factor(traindataX10)
traindataX11<-traindata[,11]
traindataX11<-as.factor(traindataX11)
traindataX12<-traindata[,12]
traindataX12<-as.factor(traindataX12)
traindataX13<-traindata[,13]
traindataX13<-as.factor(traindataX13)
traindataX14<-traindata[,14]
traindataX14<-as.factor(traindataX14)
traindataX15<-traindata[,15]
traindataX15<-as.factor(traindataX15)
traindataX16<-traindata[,16]
traindataX16<-as.factor(traindataX16)
testdataX2<-testdata[,2]
testdataX2<-as.factor(testdataX2)
testdataX3<-testdata[,3]
testdataX3<-as.factor(testdataX3)
testdataX4<-testdata[,4]
testdataX4<-as.factor(testdataX4)
testdataX5<-testdata[,5]
testdataX5<-as.factor(testdataX5)
testdataX6<-testdata[,6]
testdataX6<-as.factor(testdataX6)
testdataX7<-testdata[,7]
testdataX7<-as.factor(testdataX7)
testdataX8<-testdata[,8]
testdataX8<-as.factor(testdataX8)
testdataX9<-testdata[,9]
testdataX9<-as.factor(testdataX9)
testdataX10<-testdata[,10]
testdataX10<-as.factor(testdataX10)
testdataX11<-testdata[,11]
testdataX11<-as.factor(testdataX11)
testdataX12<-testdata[,12]
testdataX12<-as.factor(testdataX12)
testdataX13<-testdata[,13]
testdataX13<-as.factor(testdataX13)
testdataX14<-testdata[,14]
testdataX14<-as.factor(testdataX14)
testdataX15<-testdata[,15]
testdataX15<-as.factor(testdataX15)
testdataX16<-testdata[,16]
testdataX16<-as.factor(testdataX16)
library(randomForest)
randommodel<-randomForest(X1~.,data=traindata,ntree=300,mtry=12)
prediction<-predict(randommodel,newdata=testdata,type="class")
frep<-table(prediction,testdata$X1)
frep
拟合时,报错为:Error in randomForest.default(m, y, ...) : Can't have empty classes in y.
随机森林拟合时data=2251时就可以进行,data=traindata时就报错
请问大神是什么情况啊?
扫码或添加微信号:坛友素质互助


「经管之家」APP:经管人学习、答疑、交友,就上经管之家!
免流量费下载资料----在经管之家app可以下载论坛上的所有资源,并且不额外收取下载高峰期的论坛币。
涵盖所有经管领域的优秀内容----覆盖经济、管理、金融投资、计量统计、数据分析、国贸、财会等专业的学习宝库,各类资料应有尽有。
来自五湖四海的经管达人----已经有上千万的经管人来到这里,你可以找到任何学科方向、有共同话题的朋友。
经管之家(原人大经济论坛),跨越高校的围墙,带你走进经管知识的新世界。
扫描下方二维码下载并注册APP
本文关键词:

本文论坛网址:https://bbs.pinggu.org/thread-6713735-1-1.html

人气文章

1.凡人大经济论坛-经管之家转载的文章,均出自其它媒体或其他官网介绍,目的在于传递更多的信息,并不代表本站赞同其观点和其真实性负责;
2.转载的文章仅代表原创作者观点,与本站无关。其原创性以及文中陈述文字和内容未经本站证实,本站对该文以及其中全部或者部分内容、文字的真实性、完整性、及时性,不作出任何保证或承若;
3.如本站转载稿涉及版权等问题,请作者及时联系本站,我们会及时处理。
经管之家 人大经济论坛 大学 专业 手机版