在`$＆lt; - 。data.frame中输入R错误

Question

我试图在R中使用Smote。我一直在python中使用imbalanced learn已经做得很好但是现在我需要R中的代码。我收到以下错误：

Error in `$<-.data.frame`(`*tmp*`, "trainClasses", value = integer(0)) : 
  replacement has 0 rows, data has 500
Calls: $<- -> $<-.data.frame
Execution halted

我遵循了这个指南：http://amunategui.github.io/smote/但是我收到了data.frame的错误。我相信这与我对R中的数据结构的无知有关。如果有人可以帮助我使用我的代码，那将非常感激。

data = read.table("data.txt")
results10foldAll=c()

trainSet = as.data.frame(data[,1:(ncol(data)-1)])
trainClasses = as.factor(data[,ncol(data)])

trainSet$trainClasses <- as.factor(trainSet$trainClasses)
trainSet <- SMOTE(trainClasses ~ ., trainSet, perc.over = 100, perc.under=200)
trainSet$trainClasses <- as.numeric(trainSet$trainClasses)