Advertisement

系统聚类方法用于饮料分类(使用R语言)

阅读量:

如下表格列出了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

全部评论 (0)

还没有任何评论哟~