r Сводная функция пакета gbm, выполняющая ошибки - PullRequest
Новая
       7

r Сводная функция пакета gbm, выполняющая ошибки

0 голосов
/ 20 мая 2018

Я пытаюсь использовать пакет gbm в r, и у меня возникают проблемы с функцией итога.Надеюсь, что кто-то может помочь.Мой код выглядит следующим образом: 

library(ISLR)
Caravan$Purchase <- ifelse(Caravan$Purchase == "Yes", 1, 0)
train_index <- 1:1000
train <- Caravan[train_index, ]
test <- Caravan[-train_index, ]

library(gbm)
set.seed(1234)
boost <- gbm(Purchase ~ ., data = train, n.trees=400, shrinkage =0.01,
             distribution = "bernoulli")
summary(boost)

Я получаю следующее сообщение об ошибке с traceback: 

Error in plot.window(xlim, ylim, log = log, ...) : need finite 'xlim' values
5.
plot.window(xlim, ylim, log = log, ...)
4.
barplot.default(rel.inf[i[cBars:1]], horiz = TRUE, col = rainbow(cBars, start = 3/6, end = 4/6), names = object$var.names[i[cBars:1]], xlab = "Relative influence", ...)
3.
barplot(rel.inf[i[cBars:1]], horiz = TRUE, col = rainbow(cBars, start = 3/6, end = 4/6), names = object$var.names[i[cBars:1]], xlab = "Relative influence", ...)
2.
summary.gbm(boost)
1.
summary(boost)

Я попытался использовать обходной путь здесь: http://www.samuelbosch.com/2015/09/workaround-ntrees-is-missing-in-r.html безрезультатно.

Есть предложения?

РЕДАКТИРОВАТЬ 1: Подтвержденная ошибка возникает в R 3.5.0, но не возникает в 3.4.4.

...