找回密码
 立即注册
查看: 5007|回复: 2

新人求帮忙,关于聚类分析

[复制链接]
发表于 2014-5-28 13:45:42 | 显示全部楼层 |阅读模式
小弟我真心没学过R语言,但是期末老师操蛋得让我们用R做作业,说是网上能查到方法。回归分析和主成分分析我勉强做完了。可是聚类分析我真心不会啊,求大神帮忙解答,求个代码,因为选修课,扛过就好。
题目如下:
5 聚类分析作业
· 采用 省市名称综合指数之外的其余变量,对31个省份进行聚类分析, 分为3–5,并 绘制聚类谱系图
· 聚类之前对变量进行标准化处理,距离采用平方欧式距离
数据如下:
"省份"
"综合指数"
"社会结构"
"经济技术发展"
"人口素质"
"生活质量"
"法制与治安"
"北京"
93.2
100
94.7
108.4
97.4
55.5
"上海"
92.3
95.1
92.7
112
95.4
57.5
"天津"
87.9
93.4
88.7
98
90
62.7
"浙江"
80.9
89.4
85.1
78.5
86.6
58
"广东"
79.2
90.4
86.9
65.9
86.5
59.4
"江苏"
77.8
82.1
74.8
81.2
75.9
74.6
"辽宁"
76.3
85.8
65.7
93.1
68.1
69.6
"福建"
72.4
83.4
71.7
67.7
76
60.4
"山东"
71.7
70.8
67
75.7
70.2
77.2
"黑龙江"
70.1
78.1
55.7
82.1
67.6
71
"吉林"
67.9
81.1
51.8
85.8
56.8
68.1
"湖北"
65.9
73.5
48.7
79.9
56
79
"陕西"
65.9
71.5
48.2
81.9
51.7
85.8
"河北"
65
60.1
52.4
75.6
66.4
76.6
"山西"
64.1
73.2
41
73
57.3
87.8
"海南"
64.1
71.6
46.2
61.8
54.5
100
"重庆"
64
69.7
41.9
76.2
63.2
77.9
"内蒙古
63.2
73.5
42.2
78.2
50.2
81.4
"湖南"
60.9
60.5
40.3
73.9
56.4
84.4
"青海"
59.9
73.8
43.7
63.9
47
80.1
"四川"
59.3
60.7
43.5
71.9
50.6
78.5
"宁夏"
58.2
73.5
45.9
67.1
46.7
61.6
"新疆"
64.7
71.2
57.2
75.1
57.3
64.6
"安徽"
56.7
61.3
41.2
63.5
52.5
72.6
"云南"
56.7
59.4
49.8
59.8
48.1
72.3
"甘肃"
56.6
66
36.6
66.2
45.8
79.4
"广西"
56.1
63.8
37.1
64.4
56.1
66.6
"江西"
54.7
66.4
33.3
61.6
45.6
77.5
"河南"
54.5
51.6
42.1
63.3
55
66.9
"贵州"
51.1
61.9
31.5
56
41
75.6
"西藏"
50.9
59.7
50.1
56.7
29.9
62.4

回复

使用道具 举报

发表于 2014-6-2 16:14:19 | 显示全部楼层
首先用dist()函数形成dissimilarity structure:
> dist.r = dist(data, method=" ")
再用hclust()进行聚类。
> hc.r = hclust(dist.r, method = “ ”)
//stats里提供等级聚类hclust()和k-均值聚类kmeans()。
画聚类图
> plot(hc.r, hang = -1)
如果提供的数据是距离矩阵,需要转换成dist类型
> d = matrix
> dmat = as.dist(d)
其实就这三步(读入数据,选择方法,画图)
> z=read.table("d:/data/drink.txt")
> hc=hclust(dist(z),"ave")
> plot(hc,hang=-1)
> dendro.plot<-as.dendrogram(hc)
> plot(dendro.plot,horiz=T)
回复

使用道具 举报

 楼主| 发表于 2014-6-19 22:05:49 | 显示全部楼层
GlvinZhao 发表于 2014-6-2 16:14
首先用dist()函数形成dissimilarity structure:
> dist.r = dist(data, method=" ")
再用hclust()进行 ...

不好意思,这么晚回复···
谢谢你的解答。。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|R语言中文网

GMT+8, 2024-11-25 13:27 , Processed in 0.040098 second(s), 17 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表