中式编程ruby枚举与R语言绘制不同颜色十六进制值的树状图

library("factoextra")
# Compute k-means with k = 3
set.seed(123)
res.km <- kmeans(scale(df[, -5]), 3, nstart = 25)
# K-means clusters showing the group of each individuals
res.km$cluster
data("USArrests")
df <- scale(USArrests)
res.hc <- eclust(df, "hclust") # compute hclust
fviz_dend(res.hc,palette = c("#BA55D3","#9370DB","#3CB371"), rect = TRUE) # dendrogam

fviz_dend(res.hc,palette = c("#7B68EE","#00FA9A","#48D1CC"), rect = TRUE) # dendrogam

开发环境:Rubymine、RStuido与微信截屏工具

The book of Ruby----A hands-on guide for the Adventurous---[英]Huw Collingbourne---no starch press