GBM和插入符號包：無效的間隔數

Question

雖然我正在定義target <- factor(train$target, levels = c(0, 1)) ，但下面給出的代碼提供了此錯誤：

cut.default（y，unique（quantile（y，probs = seq（0，1，length = cuts））））中的錯誤：無效的間隔數另外：警告消息：1：在train.default（x，y中，weights = w，...）：無法計算回歸的類概率

這是什么意思，以及如何解決？

  gbmGrid <- expand.grid(n.trees = (1:30)*10, 
                         interaction.depth = c(1, 5, 9), 
                         shrinkage = 0.1)

  fitControl <- trainControl(method = "repeatedcv", 
                             number = 5, 
                             repeats = 5, 
                             verboseIter = FALSE, 
                             returnResamp = "all",
                             classProbs = TRUE)

  target <- factor(train$target, levels = c(0, 1)) 

  gbm <- caret::train(target ~ .,
                      data = train,
                      #distribution="gaussian",
                      method = "gbm",
                      trControl = fitControl,
                      tuneGrid = gbmGrid)

  prob = predict(gbm, newdata=testing, type='prob')[,2]

Answer 1

首先，不要這樣做：

 target <- factor(train$target, levels = c(0, 1)) 

您將收到警告：

至少一個類級別不是有效的R變量名稱； 如果生成類概率，則可能會導致錯誤，因為變量名稱將被轉換為：X0，X1

其次，您創建了一個名為target 。 使用公式方法意味着train將使用數據幀train中的稱為target的train而這些列是不同的數據。 修改列。