多元统计分析及R语言建模-第7章 聚类分析

本文详细介绍了在R语言中进行聚类分析的方法,包括使用dist()计算距离矩阵,hclust()进行系统聚类,以及kmeans()实现快速聚类。通过实例展示了不同聚类方法的应用,如最短距离法、ward法,并提供了全国区域经济的聚类分析案例。
摘要由CSDN通过智能技术生成
# 第7章 聚类分析
x1 = c(5,7,3,6,6)
x2 = c(7,1,2,5,6)
plot(x1,x2); text(x1,x2,rownames(1:5),adj=-0.5)


# 距离矩阵计算函数dist()的用法
dist(x, method="euclidean", diag=FALSE, upper=FALSE, p=2)
# x为数据矩阵,数据框,method为计算方法,包括"euclidean","maximum","manhattan","canberra","binary","minkowski"
# diag为是否包含对角线元素,upper为是否需要上三角,p为Minkowski距离的幂次
X = cbind(x1,x2)
dist(X, method="minkowski", p=2)


# 系统聚类函数hclust()的用法
hclust(d, method="complete", ...)
# d为相似矩阵,method为系统聚类方法,包括"ward","single","complete","average","mcquitty","median","centroid"
# 最短距离法-欧式距离
hc = hclust(dist(X), "single")
cbind(hc$merge, hc$height)
plot(hc)


# w
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值