Ошибка в !toroidal: недопустимый тип аргумента в R с пакетом som

Я пытаюсь использовать пакет som в R, и хотя я использую пример данных, который поставляется с пакетом som, он все равно выдает мне ошибку. Когда я вчера попробовал тот же пример набора данных, он сработал. я теперь в замешательстве..

Вот код

library(som)
library(class)
data(wines)
set.seed(7)

training <- sample(nrow(wines), 120)
Xtraining <- scale(wines[training, ])
Xtest <- scale(wines[-training, ],
               center = attr(Xtraining, "scaled:center"),
               scale = attr(Xtraining, "scaled:scale"))

som.wines <- som(Xtraining, grid = somgrid(5, 5, "hexagonal"))

som.prediction <- predict(som.wines, newdata = Xtest,
                          trainX = Xtraining,
                          trainY = factor(wine.classes[training]))
table(wine.classes[-training], som.prediction$prediction)

Ошибка, которую я получаю, настолько общая, что я не смог понять, что именно это такое.

som.wines <- som(Xtraining, grid = somgrid(5, 5, "hexagonal"))
Error in !toroidal : invalid argument type