R - 군집분석(hclust 활용) 예제

---

다음은 hclust 함수를 사용하여 학생들의 신체검사 결과를 군집분석하는 예제입니다.

---

코드

#학생들의 신체검사 결과를 군집분석

body<-read.csv("testdata/bodycheck.csv",header = TRUE)

body

idist <-dist(body[,-1])

idist

#계층적 군집분석

hc <-hclust(idist)

hc #Cluster method   : complete

par(mfrow=c(1,1))

plot(hc, hang=-1) #유사한 그룹끼리 나누어져 있음

rect.hclust(hc, k=3,border = "red") #테두리 그음(3개의 영역으로 나눔)

#군집별 특징

# 3개로 나눈 영역별로 따로 또 나눔

g1 <-subset(body, 번호==10 | 번호==4 |번호==8 |번호==1| 번호==15)

g2 <-subset(body, 번호==11 | 번호==3 |번호==5 |번호==6| 번호==14)

g3 <-subset(body, 번호==2 | 번호==9 |번호==13 |번호==7| 번호==12)

g1 ; g2; g3

summary(g1[2:4]) #번호빼고 봄(번호가 1번째)

summary(g2[2:4])

summary(g3[2:4])

#계층적군집분석으로인해 크게 몇개 영역으로 나눈지 알수 있다.

샘플 데이터

실습53_hcluster.R

---

본 포스팅은 KIC 캠퍼스에서 박영권 강사의 지도하에 공부하며 작성한 리포트입니다.

혹시 잘못된 내용이 있거나 문제 소지시 댓글 남겨주시면 조치하겠습니다.

---

저작자표시비영리변경금지

'Data > Analytics' 카테고리의 다른 글

R - neuralnet 예제  (0)	2018.05.18
R - diamonds dataset을 활용한 k-means 분석 예제  (0)	2018.05.17
R - K-means 군집분석 예제  (0)	2018.05.16
R - 군집분석(hclust 활용) 예제  (0)	2018.05.16
R - 군집분석 예제  (0)	2018.05.14
R - neuralnet 함수를 사용하여 역전파 알고리즘 사용 예제  (0)	2018.05.13
R - ANN 알고리즘 예제#2  (0)	2018.05.13