Graficul cotului (Scree plot)

În exercițiile anterioare ai calculat suma totală a pătratelor în interiorul clusterelor pentru valori ale lui k cuprinse între 1 și 10. Poți vizualiza această relație folosind un grafic liniar, obținând astfel ceea ce se numește un grafic al cotului (sau scree plot).

Când analizezi un astfel de grafic, urmărești o scădere abruptă de la un k la altul, urmată de o scădere mai treptată a pantei. Ultima valoare a lui k înainte ca panta să se aplatizeze sugerează o valoare „bună" pentru k.

Acest exercițiu face parte din cursul

Analiza clusterelor în R

Vezi cursul

Instrucțiuni pentru exercițiu

Continuând lucrul din exercițiul anterior, folosește valorile din elbow_df pentru a trasa un grafic liniar care să ilustreze relația dintre k și suma totală a pătratelor în interiorul clusterelor.

Exercițiu interactiv practic

Încearcă acest exercițiu completând acest cod de exemplu.

# Use map_dbl to run many models with varying value of k (centers)
tot_withinss <- map_dbl(1:10,  function(k){
  model <- kmeans(x = lineup, centers = k)
  model$tot.withinss
})

# Generate a data frame containing both k and tot_withinss
elbow_df <- data.frame(
  k = 1:10,
  tot_withinss = tot_withinss
)

# Plot the elbow plot
ggplot(___, aes(x = ___, y = ___)) +
  geom_line() +
  scale_x_continuous(breaks = 1:10)

Editează și rulează codul