Я пытаюсь использовать пакет R суперсомы Кохонена, и у меня есть ошибка
Error in RcppSupersom(data = data.matrix, codes = init.matrix, numVars = nvar, : No nearest neighbour found...
Мой код:
prs.sample <- load_sample(cass_tbl) # loaded from spark = crassy::spark_load_cassandra_table(...)
data <- prs.sample %>% collect()
row_names <- data[,1]
prs.data <- list(nbmol=data.matrix(as.matrix(data[, c(2)], ncol=1)),
med_qT=data.matrix(as.matrix(data[, c(6,11,17,18,19)], ncol=5)),
pat_qT=data.matrix(as.matrix(data[, c(24,29,52)], ncol=3)),
patho=data.matrix(as.matrix(data[, c(30,31,32,33,34,35,36,38,39,40,41,42,43,46,47,48,50)], ncol=17)),
diag=data.matrix(as.matrix(data[, c(53,54,55,56,57,58,59,60,61,62,63,64,65,66,69,70,71,73)], ncol=18)),
cmn_qT=data.matrix(as.matrix(data[, c(77,78)], ncol=2)),
soin=data.matrix(as.matrix(data[, 85:127], ncol=42)))
row_names = prs.df[,1]
rownames(prs.data$nbmol) <- row_names$id
rownames(prs.data$med_qT) <- row_names$id
rownames(prs.data$pat_qT) <- row_names$id
rownames(prs.data$patho) <- row_names$id
rownames(prs.data$diag) <- row_names$id
rownames(prs.data$cmn_qT) <- row_names$id
rownames(prs.data$soin) <- row_names$id
colnames(prs.data$nbmol) <- c("nbmol")
prs.koh <- supersom(prs.data, koh_grid, rlen=rlen, mode=my_mode, alpha=my_alpha)
Что это значит?Я пытался использовать сом (со всеми данными в одном слое) вместо суперсома, и нет никаких проблем, но было бы лучше, если бы я мог использовать суперсом ...
Пример, приведенный в пакете (дрожжи)) похоже тот же формат, что и у меня ...