# NOT RUN {
# You must have "factoextra" library to use this auxiliary function:
# }
# NOT RUN {
data("iris")
df <- subset(iris, select = c(-Species))
# Calculate and plot optimal k clusters
clusterOptimalK(df)
# }
Run the code above in your browser using DataLab