Вы неправильно определили опции для функции train
.Это может работать для вас:
model.glm <- train(Accident_Severity ~ ., data = smote_train,
method = "glm", metric = "Kappa", trControl= trainControl())
При исходном вызове функции опция trControl = "ctrl"
вызвала сообщение об ошибке, которое вы получили.Однако также вероятно, что опция metric = "RMSE"
не будет работать с вашими данными (я предполагаю, что ваша переменная Accident_Severity
является факторной переменной и вы пытаетесь соответствовать модели классификации).