У меня проблема, когда я пытаюсь запустить модель KNN на обучающих данных, но она показывает мне ошибку: "Error in data[[y_orig_val]]
: нижний индекс вне границ "при запуске функции поезда.
Сначала я импортировал и разделил его на наборы для поездов и тестов:
library(xts)
data1 = xts(x=data[,-1],order.by= as.POSIXct(data$Date))
set.seed(1)
data_split1 <- initial_split(data1, prop = 0.7)
train1 <- training(data_split1)
test1 <- testing(data_split1)
Затем я сделал план для вставки в функцию train (), где я нормализовал предикторы без одного:
blueprint <- recipe(SNPclose ~., data = train1) %>%
step_normalize(all_predictors(), -longtermvsshortterm)
Я создал это для метода передискретизации, используя 5-кратную перекрестную проверку:
cv1 <- trainControl(
method = "cv",
number = 5,
summaryFunction = defaultSummary
)
Сделал гиперсетку: hyper_grid <- expand.grid (k = seq (2, 25, by = 1)) </p>
Но когда я пытаюсь соответствовать модели KNN, я получаю сообщение об ошибке:
# fit knn model
knn_grid <- train(
blueprint,
data = train1,
method = "knn",
trControl = cv1,
tuneGrid = hyper_grid,
metric = "RMSE"
)
= Ошибка в данных [[y_orig_val]]: нижний индекс выходит за границы
Любой, у кого есть Я просто следую книге «Практическое машинное обучение с R», чтобы соответствовать модели (и настраивать параметры в соответствии с моими данными).
С уважением.