K-Means Clustering

## analisis cluster non hierarki - K means##
library(factoextra)
library(gridExtra)
#input data
data = read.delim("clipboard")
data
summary(data)
cor(data1)#Fungsi KMO
kmo <- function (x){
x <- subset (x, complete.cases(x))
r <- cor (x)
r2 <- r^2
i <- solve (r)
d <- diag (i)
p2 <- (-i/sqrt(outer(d,d)))^2
diag(r2) <- diag(p2) <- 0
KMO <- sum(r2)/(sum(r2)+sum(p2))
MSA <- colSums(r2)/(colSums(r2)+colSums(p2))
return(list(KMO=KMO, MSA=MSA)) }
kmo(data1)
#kmeans clustering with k random
klaster <- kmeans(data1, centers=2, nstart = 25)
fviz_nbclust(data1, kmeans, method = "wss")
fviz_nbclust(data1, kmeans, method = "silhouette")
fviz_nbclust(data1, kmeans, method = "silhouette")
sapply(data1,var)
rge<-sapply(data1, function(x)diff(range(x)))
data1 <- sweep(data1, 2, rge, FUN ="/")
sapply(data1, var)
#correlation distance
library(factoextra)
distance <- get_dist(data1) #jarak antara obyek yang satu dengan yang
distance
fviz_dist(distance, gradient=list(low="green", mid="white", hight="red"))
  • Cluster 1 : memiliki anggota 17 kecamatan, dimana cluster pertama memiliki rata — rata masalah kemacetan, sampah, dan lapangan pekerjaan yang paling tinggi (dilihat berdasarkan nilai rata — ratanya). Meskipun tidak menutup kemungkinan 2 masalah lain terjadi tetapi tidak terlalu menjadi prioritas masalah dalam cluster 1.
  • Cluster 2 : memiliki anggota 13 kecamatan, dimana cluster kedua memiliki rata — rata masalah banjir, dan ketersediaan air bersih yang paling tinggi (dilihat berdasarkan nilai rata — ratanya). Akan tetapi tidak menutup kemungkinan 3 masalah lainnya terjadi tetapi tidak terlalu menjadi prioritas masalah dalam cluster 2.

K-Means Clustering Swiss Dataset With R

K-means merupakan salah satu algoritma clustering. Tujuan algoritma ini yaitu untuk membagi data menjadi beberapa…

medium.com

K-Means Clustering Part 1 (Tanpa Scalling Data)

K-means merupakan metode analisis klaster non-hirarki yang dimulai dengan menentukan terlebih dahulu jumlah kluster…

medium.com

10

--

--

Love podcasts or audiobooks? Learn on the go with our new app.

Get the Medium app

A button that says 'Download on the App Store', and if clicked it will lead you to the iOS App store
A button that says 'Get it on, Google Play', and if clicked it will lead you to the Google Play store