Нейронная сеть: требуются числовые/сложные матричные/векторные аргументы

Я использовал пакет neuralnet для построения модели классификации в R. Однако столкнулся с известной ошибкой:

Error in cbind(1, pred) %*% weights [[num_hidden_layers + 1]]:    
requires numeric/complex matrix/vector arguments

Здесь есть много других подобных вопросов, но ни один из них не решил мою проблему. Вот шаги, которые я предпринимаю:

1. Использование model.matrix для создания фиктивных столбцов (гарантируя, что ни один столбец не является фактором или строкой)
2. Создание формулы вручную с помощью функции paste
3. Обучение neuralnet с использованием набора данных с горячим кодированием на шаге 1 и формулы, созданной на шаге 2.

До сих пор все в порядке. Нет ошибки. Модель сходится после 5000 итераций. Однако, когда я использую функции compute или predict для предсказания тестовых данных, это дает мне указанную выше ошибку.

Я почти уверен, что столбцы одинаковы и имеют одно и то же имя. Кроме того, класс является числовым для каждого атрибута. Я сказал себе, что, возможно, тестовый набор плохо трансформируется с помощью model.matrix, поэтому я использовал тот же тренировочный набор в функции прогнозирования/вычисления! Удивительно, но для одного и того же тренировочного набора выдает аналогичную ошибку! Если данные не являются числовой/сложной матрицей, как они сначала обучаются и не могут быть предсказаны сейчас?

PS: я не могу поделиться данными из-за проблемы с конфиденциальностью. Это упрощенный код:

trainset = model.matrix(~., data=train_roig)
NN_model = neuralnet(f, trainset[,-c(1:2)], hidden = c(4,2))
# NO ERROR
compute(NN_model, trainset[,-c(1:2)])
# GIVES ME THE ERROR
predict(NN_model, trainset[,-c(1:2)])
# GIVES ME THE SAME ERROR

Двойная проверка имен столбцов:

NN_model$model.list$variables == colnames(trainset[,-c(1:2)])
# TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE

Проверка состава поезда после применения model.matrix:

str(trainset)
# num [1:134260, 1:19] 0 0 0 0 0 0 0 0 0 ... 
# -attr(*, "dimnames") = list of 2
# ..$ : chr [1:134260] "1" "2" "3" "4" ...
# ..$ : chr [1:19] "Y" "n_trips" "age" "sexM" ...