在R中使用SOM时出现“外部函数调用（arg 1）中的NA / NaN / Inf”错误

Question

我正在尝试解决这个问题：

每个图像的高度为28像素，宽度为28像素，总共为784像素。每个像素具有与其相关联的单个像素值，指示该像素的亮度或暗度，较高的数字意味着较暗。该像素值是0到255之间的整数，包括0和255.

训练数据集（train.csv）有785列。第一列称为“标签”，是用户绘制的数字。其余列包含相关图像的像素值。

我在R中执行了以下代码并返回了此错误NA/NaN/Inf in foreign function call (arg 1)：

#load library
library(kohonen)

#load data
train <- read.csv("C:/DigitRecognizer/data/train.csv", header=TRUE)
test <- read.csv("C:/DigitRecognizer/data/test.csv", header=TRUE)

labels <- train[,1]
train <- train[,-1]

train.scale <- scale(train)
labels.classes <- classvec2classmat(labels)

#training
system.time( training <- som(train.scale , grid=somgrid(5,5,"hexagonal"), rlen=200))

我的数据有很多零，我认为这是问题所在。

我该如何解决这个问题？