Хотя я определяю, что 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 , веса = 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]
train
вtarget <- factor(train$target,...)
? - person Marat Talipov   schedule 20.02.2015summaryFunction = twoClassSummary
в свою функциюtrainControl
и посмотрите, работает ли она. - person LyzandeR   schedule 21.02.2015