Похоже, что genRandomClust не генерирует случайные кластеры - PullRequest
0 голосов
/ 07 июня 2018

Я пытался создать сом случайных кластеров, используя пакет clusterGeneraion.Я продолжаю получать один и тот же вывод с точки зрения распределения классов и тех же кластеров, используя kmeans.Это код:

library(factoextra)
library(clusterGeneration)

nclust = 3
feat = 3

data = genRandomClust(numClust=nclust,
                        sepVal=-0.1, numNonNoisy=feat,
                        clustszind=2)

data = as.data.frame(cbind(data$datList$test_1, data$memList$test_1))
colnames(data)[feat+1] = "class"
table(data$class)

km.res <- eclust(data[,-(feat+1)], "kmeans", k = nclust, nstart = 25, graph = FALSE)
table(km.res$cluster, data$class)

, который всегда дает мне следующие данные:

Распределение классов

  1   2   3 
 77 102 153 

Кластеры из kmeans

      1   2   3
  1   4  81   1
  2  70   7  14
  3   3  14 138

Почемуэто не случайно?

...