r语言“无法分配...矢量”的问题

r语言“无法分配...矢量”的问题

也许是你用户函数不好

举例：用随机数法来生成训练集和测试集

library(sampling)

n<-round(nrow(audit2)/4)

set.seed(1)

sub_train=sample(1:nrow(audit2),n)
data_train=getdata(audit2,sub_train) #训练集
data_test=getdata(audit2,-sub_train) #测试集
这个就产生了无法分配...矢量的问题

后来，更换了方法就ok了。

set.seed(1)
sub<-sample(1:nrow(audit2),round(nrow(audit2)/4))
length(sub)
data_train<-audit2[-sub,]#训练集
data_test<-audit2[sub,]#测试集