Я хочу запустить кластеризацию kmeans на моих данных и показать график, используя этот код: метод Elbow используется для вычисления числа k .
library(tidyverse) # data manipulation
library(cluster) # clustering algorithms
library(factoextra) # clustering algorithms & visual
library(NbClust) #use zip file to install it
wss <- function(k) {
kmeans(df_km, k, nstart = 25 )$tot.withinss
}
# Compute and plot wss for k = 1 to k = 32
k.values <- 1:32
wss_values <- map_dbl(k.values, wss)
set.seed(123)
fviz_nbclust(df_km, FUNcluster = kmeans, method = "wss")
в последней строкекод, он показывает эту ошибку:
Error in FUNcluster(x, i, ...) : could not find function "FUNcluster"
Я попытался перезапустить сессию, также использовал .zip, CRAN, а также эту ссылку, чтобы загрузить "factoextra" devtools :: install_github ("kassambara / factoextra")
Но все равно я получаю ошибку.Любое решение, чтобы решить это?