Функция Fviz_cluster () выдает ошибку при использовании функции kmeans () в качестве аргумента в параметре

Question

Я хочу визуализировать вывод кластера, который я вычислил с помощью функции kmeans(). Я прочитал, что функция fviz_cluster() хорошо работает с выходами kmeans(), но я столкнулся с ошибкой, которую пока не понимаю, как пройти.

Вот строка с ошибкой:

fviz_clustering(testk4, data = df)

Error is: 
rror in as.vector(x, mode) : 
  cannot coerce type 'closure' to vector of type 'any'

Я идентифицировал результирующий вывод функции kmeans() как список и запустил функцию fviz_clustering() с аргументом:

fviz_clustering(testK4, data = list)

Однако я получаю новую ошибку:

Error in as.vector(x, mode) : 
  cannot coerce type 'builtin' to vector of type 'any'

Я также пытался преобразовать testK4 во фрейм данных, но получаю следующую ошибку при запуске этой строки:

fviz_cluster(dfTestK4, data = df)

Ошибка:

Error in fviz_cluster(dfTestK4, data = df) : 
  Can't handle an object of class data.frame

Вот testK4:

K-means clustering with 4 clusters of sizes 3511, 169586, 424895, 29327

Cluster means:
       [,1]
1 2425805.0
2  392879.8
3  175354.2
4  855704.1

Clustering vector:
   [1] 3 3 3 3 3 3 3 3 3 3 3 3 3 3 2 3 3 3 2 3 2 3 3 3 3 2 2 3 2 2 3 3 2 4 4 2 2 2 2 2 2 3 2 3 2 3 2 4 2 2 2 2 3 2
  [55] 4 2 4 2 2 2 4 2 2 2 3 2 3 2 2 3 2 2 4 3 2 2 2 3 3 2 2 2 1 2 3 3 2 2 2 3 2 2 2 2 2 2 4 2 2 3 2 3 3 3 3 3 2 2
 [109] 3 2 2 2 3 3 2 2 2 3 3 2 2 2 2 2 3 3 3 2 3 3 3 3 3 3 3 3 3 3 2 2 3 3 2 3 3 2 2 2 3 3 2 3 3 3 2 3 3 3 3 3 2 2
 [163] 3 3 3 2 3 3 2 3 3 3 3 3 3 3 3 3 3 2 2 3 2 3 3 3 3 2 3 3 3 3 2 3 3 2 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 2 3 3 3 3
 [217] 3 2 2 3 3 3 3 3 3 3 3 3 3 2 3 3 2 3 2 2 2 2 3 3 3 3 2 2 2 3 3 3 2 3 3 2 3 3 3 2 3 3 3 3 3 3 3 3 3 3 3 3 3 3
 [271] 2 3 2 3 3 3 3 2 2 2 3 3 2 2 3 2 2 2 3 3 3 2 2 2 3 2 2 3 3 2 2 3 3 3 3 2 3 3 2 3 2 2 3 3 3 3 3 3 3 2 2 2 2 4
 [325] 4 2 1 4 2 4 4 4 4 4 2 2 2 2 2 3 2 2 2 4 2 2 4 2 2 2 3 3 2 3 2 2 2 2 2 2 2 2 2 2 2 2 4 2 2 3 2 2 2 2 3 2 2 2
 [379] 2 3 2 2 2 2 2 3 4 3 2 3 3 3 2 2 2 3 3 3 3 3 3 3 2 2 2 4 3 2 4 2 2 4 2 2 3 3 4 4 4 2 2 4 3 3 3 2 2 2 3 2 2 2
 [433] 2 3 2 3 2 4 4 4 2 2 2 2 2 4 2 2 2 2 2 2 2 4 2 2 2 2 2 2 2 2 2 2 2 2 3 2 2 2 2 4 4 2 2 2 2 2 2 4 2 4 2 2 2 2
 [487] 2 2 2 2 2 2 2 2 2 2 2 4 2 2 4 2 2 2 2 2 2 2 2 4 2 2 2 2 2 4 2 2 2 2 2 2 2 2 4 2 4 2 4 2 2 4 3 2 3 3 3 2 2 3
 [541] 3 3 3 3 3 3 3 3 3 3 2 3 3 3 3 3 3 3 3 2 3 2 3 3 2 3 3 2 2 3 2 2 2 3 2 2 3 3 3 3 3 3 2 3 3 2 3 3 3 3 2 3 3 3
 [595] 3 3 3 3 3 2 3 3 3 3 3 3 3 3 3 3 3 3 2 3 3 3 3 3 3 3 3 2 3 3 3 3 3 3 3 3 3 3 3 2 2 3 3 3 3 3 3 3 3 3 2 3 3 2
 [649] 3 3 3 3 3 3 2 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 2 3 3 3 3 3 3 3 2 2 3 3 3 3 3 3 3 3 3 3 3 3 3 2 3 3 3 3 3 3
 [703] 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 2 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3
 [757] 3 2 2 2 4 2 3 2 3 2 3 2 2 3 2 3 2 3 3 3 3 3 3 3 3 4 3 3 3 2 2 3 3 3 3 3 2 2 2 3 3 3 3 3 3 3 3 2 3 2 3 3 2 2
 [811] 3 2 2 2 2 2 3 3 2 2 3 3 2 2 2 3 2 3 3 3 3 3 3 3 2 3 3 3 3 3 3 3 3 3 3 3 2 3 2 3 3 3 2 3 2 3 2 3 3 2 3 3 3 2
 [865] 2 2 3 2 3 2 2 2 2 3 4 2 2 2 2 2 2 2 2 2 2 2 2 2 3 3 3 3 2 2 2 2 2 3 2 2 3 3 3 2 3 3 3 3 3 3 2 2 3 2 2 2 2 2
 [919] 2 3 3 3 2 2 2 2 3 3 3 2 2 4 2 3 2 2 2 2 2 2 2 3 3 3 2 3 2 2 2 2 2 3 2 2 3 2 2 2 2 2 3 3 3 3 3 3 3 3 3 2 2 2
 [973] 3 3 2 3 2 3 2 3 3 2 3 3 2 2 2 3 3 4 3 3 3 3 2 3 3 3 3 3
 [ reached getOption("max.print") -- omitted 626319 entries ]

Within cluster sum of squares by cluster:
[1] 2.333268e+15 1.257426e+15 1.320410e+15 1.649188e+15
 (between_SS / total_SS =  83.3 %)

Available components:

[1] "cluster"      "centers"      "totss"        "withinss"     "tot.withinss" "betweenss"    "size"        
[8] "iter"         "ifault"      

Я ожидал увидеть 4 кластера, но мои попытки давали ошибки. Как мне пройти эту ошибку? Спасибо.