*disclaimer
632794
[R]
Cluster Analysis クラスター分析
> head(errdat5) > kyori <- dist(errdat5[ , -1]) > errdat5.hc <- hclust(kyori, method="ward.D2") > plot(errdat5.hc) > errdat5.hc.cut5 <- cutree(errdat5.hc, k=5) > C.score <- errdat5[ , 1] > errdat5.hc.table <- table(C.score, errdat5.hc.cut5) > errdat5.hc.table
https://sugiura-ken.org/wiki/