系列文章目录

第一篇：R语言和RStudio安装，载入TXT、CSV和XLSX（利用RODBC）文件

文章目录

系列文章目录
前言
一、国家统计局采集数据
二、用R语言对数据进行系统聚类分析
- 1.载入数据文件
- 2.计算距离矩阵和最长距离法聚类
- 3. 绘制谱系图
- 4. 显示聚类结果
总结

前言

本文讲述如何到国家统计局采集数据，并利用R语言进行系统聚类分析的过程。

一、国家统计局采集数据

进入国家统计局，在顶部菜单栏的统计数据处，选择数据查询，进入国家数据.

本文使用的数据是2016年我国各省市运输线路长度（铁路营业里程+公路营业里程）。
在顶部菜单导航栏选择“地区数据-分省年度数据”，在左侧的菜单栏先选择“指标-运输与邮电-铁路线路长度”，再选择“地区-全部地区”，在筛选条件处指标设置为铁路营业里程（万公里），时间设置为2016，导出为csv文件。接下来导出公路营业里程的数据文件。
对表格进行处理，铁路线路长度=铁路营业里程+公路营业里程。将文件命名为dataone.csv。

二、用R语言对数据进行系统聚类分析

1.载入数据文件

注意，此处文件的编码方式默认是GBK，毕竟是政府网站导出的数据。

data<-read.csv("D:/dataone.csv",fileEncoding = "GBK")

2.计算距离矩阵和最长距离法聚类

distance <- dist(data)  #计算距离矩阵
data.hc <- hclust(distance) #最长距离法聚类

3. 绘制谱系图

plot(data.hc, hang = -1) #绘制谱系图
re <- rect.hclust(data.hc, k = 5) #分为5类

4. 显示聚类结果

for (i in 1:5) {print(paste("第",i,"类"))
print(data[re[[i]],]$地区)
}

总结

以上就是用R语言对国家统计局采集的“2016全国各省市运输线路长度”数据的系统聚类分析过程。

R语言进行系统聚类分析并作图（数据来源国家统计局）相关推荐

R语言心得说：R语言之xlsx包读写Excel数据
R语言心得说:R语言之xlsx包读写Excel数据感谢Adrian A. Drǎgulescu发布的xlsx包工具准备 [基础]简单读取excel文件数据 [基础]简单写入数据到excel文件 [ ...
R语言使用sd函数计算向量数据的标准差
R语言使用sd函数计算向量数据的标准差目录 R语言使用sd函数计算向量数据的标准差 R语言是解决什么问题的? R语言使用sd函数计算向量数据的标准差安利一个R语言的优秀博主及其CSDN专栏: R语 ...
R语言使用单个向量创建矩阵数据、通过byrow参数指定从向量转化为矩阵的过程中的数据排布方式
R语言使用单个向量创建矩阵数据.通过byrow参数指定从向量转化为矩阵的过程中的数据排布方式目录 R语言使用单个向量创建矩阵数据.通过byrow参数指定从向量转化为矩阵的过程中的数据排布方式 R语言 ...
温故知新：基于R语言的群体药代动力学数据探索
基于R语言的群体药代动力学数据探索一 .群体药代动力学数据探索目的和方法数据探索目的数据来源方法二.数据探索过程 PK数据探索加载的包和设目录读取数据和数据处理平均血药浓度计算和作图 ...
R语言使用mean函数计算向量数据的均值
R语言使用mean函数计算向量数据的均值目录 R语言使用mean函数计算向量数据的均值 R语言是解决什么问题的? R语言使用mean函数计算向量数据的均值安利一个R语言的优秀博主及其CSDN专栏: ...
R语言可以直接从数据库读取数据么？R语言读取数据库数据示例
R语言可以直接从数据库读取数据么?R语言读取数据库数据示例目录 R语言可以直接从数据库读取数据么?R语言读取数据库数据示例 R语言是解决什么问题的? R语言可以直接从数据库读取数据么?R语言读取数据 ...
R语言为dataframe添加新的数据列（add new columns）：使用R原生方法、data.table、dplyr等方案
R语言为dataframe添加新的数据列(add new columns):使用R原生方法.data.table.dplyr等方案目录 R语言为dataframe
R语言为dataframe添加新的数据列（横向拼接、Appending columns，Unioning columns）:使用R原生方法、data.table、dplyr等方案
R语言为dataframe添加新的数据列(横向拼接.Appending columns,Unioning columns):使用R原生方法.data.table.dplyr等方案目录 R语言为dat
R语言导入、读取网络CSV数据（Read a CSV from a URL）实战：R原生read_csv、readr包、data.table
R语言导入.读取网络CSV数据(Read a CSV from a URL)实战:R原生read_csv.readr包.data.table 目录 R语言导入.读取网络CSV数据(Read a CSV ...
R语言merge函数全连接dataframe数据（Full (outer) join）、merge函数进行全连接必须将参数all设置为true（all=TRUE）、默认merge函数通过公共列名合并数
R语言merge函数全连接dataframe数据(Full (outer) join).merge函数进行全连接必须将参数all设置为true(all=TRUE).默认merge函数通过公共列名合并数 ...

R语言进行系统聚类分析并作图（数据来源国家统计局）