Я все еще любитель R-программирования. Я пытаюсь написать функцию для получения начальной кластеризации с использованием InitCluster(x_{1},x_{2},..., x_{n}; K), а также для получения среднего значения и ковариации для всех кластеров. Я пытаюсь использовать код ниже:
data<- data(iris)
initialClasses <- 2
x = iris[,-5]
y = iris$Species
kcl <- kmeans(x, centers = 3, nstart = 10)
initClust<- kmeans(x, initialClasses, iter.max = 1000)
x$classes <- initClust$cluster;x$classes
x$classes
Я пытался, но все безрезультатно, поскольку функция, которую я пытался написать, выводила те же коды. Я был бы очень признателен за любую помощь руководства, чтобы пойти по этому поводу, так как я все еще ребенок в r. Спасибо