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])

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




샘플 데이터



본 포스팅은 KIC 캠퍼스에서 박영권 강사의 지도하에 공부하며 작성한 리포트입니다.
혹시 잘못된 내용이 있거나 문제 소지시 댓글 남겨주시면 조치하겠습니다.






댓글(0)

Designed by CMSFactory.NET