Sorts the silhouettes, first by group, then by value, preparatory to plotting.
sort_silhouette(sil, cluster)
The
The
The
# NOT RUN {
# Uses sports data.
data(sportsranks)
# Obtain the K-means clustering for sports ranks.
kms <- kmeans(sportsranks, centers = 5, nstart = 10)
# Silhouettes
sil <- silhouette.km(sportsranks, kms$centers)
ssil <- sort_silhouette(sil, kms$cluster)
# }
Run the code above in your browser using DataLab