系统聚类法对饮料分类--基于R

小白0126

于 2023-03-03 16:35:50 发布

阅读量883

点赞数 1

分类专栏：数学建模文章标签：聚类机器学习算法数据分析 r语言

本文链接：https://blog.csdn.net/weixin_44734502/article/details/129322439

版权

现有16种饮料的热量、咖啡因含量、钠含量和价格数据如下表所示，根据这四个变量对16种饮料进行聚类（本题来自多元统计分析-基于R课后习题）

采用系统聚类的最小距离法进行聚类，R程序如下：

# 系统聚类法
library(mclust)
ex4.2<-read.csv("ex4.2.csv",header = T)
d4.2=ex4.2[,-1] #ex4.5.csv的第一列为序号，先去掉
rownames(d4.5)=ex4.5[,1] #用ex4.2的第一列为d4.2的行重新命名
d<-dist(d4.2,method = "euclidean",diag = T,upper = F,p=2)
#采用欧氏距离计算距离矩阵d,diag设定是否输出对角线上值
#upper设定是否输出d的上三角部分值，p为明式距离参数k
HC<-hclust(d,method = "single") #采用最小距离法聚类
plot(HC,hang=-1) #绘制最小距离法聚类树状图
#当hang取负值时，从底部对齐开始绘制聚类树状图

abline(h=30);abline(h=20)

16种饮料的聚类树状图如下