R语言版数据地图是怎样的

发布时间:2021-11-22 10:39:22 作者:柒染
来源:亿速云 阅读:143

本篇文章给大家分享的是有关R语言版数据地图是怎样的,小编觉得挺实用的,因此分享给大家学习,希望大家阅读完这篇文章后可以有所收获,话不多说,跟着小编一起来看看吧。

今天要跟大家分享的是R语言版数据地图,分省(市级)热力地图。

步骤与昨天分享的中国热力地图步骤基本一致,只是需要调用的数据文件和需要自定义的指标文件略有本不同。

R语言系统环境配置:

R version 3.2.3

RStudio Version 0.99.484

在正式开始之前,必须确保你的R语言环境中已经安装以下包:

ggplot2

plyr

maptools

如果还未安装,需要先安装:install.packages("ggplot2","plyr","maptools")

下面是正式作图步骤:

1、加载所需要的R包:

library(ggplot2)

library(plyr)

library(maptools)

2、读入作图数据:

CHN_adm2 <- readShapePoly("c:/rstudy/CHN_adm/CHN_adm2.shp")  读入数据文件

3、整合与转化数据

CHN_adm2_1 <- fortify(CHN_adm2)     #转化为数据框

x <- CHN_adm2@data          #读取行政信息

xs <- data.frame(x,id=seq(0:344)-1)          #总共345行

china_map_data <- join(CHN_adm2_1, xs, type = "full")          #合并形状数据与行政

4、抽取安徽省的整合数据

anhui <-subset(china_map_data,NAME_1=="Anhui")          #取出安徽省的子集

5、读入指标数据

mydata=read.csv("c:/rstudy/anhui.csv")                  #打开自定义的指标文件。

R语言版数据地图是怎样的

以上指标数据需要你自己定义,使用excel文件创建,指标数据输入完成之后,另存为.CSV格式(存至c:/rstudy/下,这样便于引用,当然这些指标数据文件在昨天分享的数据文档里已经为你创建好了,你只需要修改数据就可以了)

anhui_data <- join(anhui, mydata, type="full")          #合并地图数据与业务数据

R语言版数据地图是怎样的

6、运行代码:

ggplot(anhui_data, aes(x = long, y = lat, group = group,fill=zhibiao)) +

     geom_polygon(colour="grey40") +

     scale_fill_gradient(low="white",high="steelblue") +

     coord_map("polyconic") +

     theme(              

          panel.grid = element_blank(),

          panel.background = element_blank(),

          axis.text = element_blank(),

          axis.ticks = element_blank(),

          axis.title = element_blank()

          ) #【无标签】

以上代码与前一篇所讲到的代码几乎一样,只是具体数据不一样。

R语言版数据地图是怎样的

midpos <- function(x) mean(range(x,na.rm=TRUE))

centres <- ddply(anhui_data,.(city),colwise(midpos,.(long,lat)))

ggplot(anhui_data,aes(long,lat)) +               

     geom_polygon(aes(group=group,fill=zhibiao),colour="black") +

     scale_fill_gradient(low="white",high="steelblue") +

     geom_text(aes(label=city),data=centres) +

     theme(               

          panel.grid = element_blank(),

          panel.background = element_blank(),

          axis.text = element_blank(),

          axis.ticks = element_blank(),

          axis.title = element_blank()

          )#【带标签】

以上代码可以输出结果带有市级行政名称的带标签数据地图来。

当然,其实我们只需要修改以上所有代码的引用文件名称,可以跑出来任意一个省份的市级热力地图。

(前提是,你已经定义好每一个省份的指标数据)

事实上,我已经搜集整理了全国27个省级行政单位的热力地图代码(TXT)和数据文件(主要是指标文件需要自己定义,而且所有省份的指标文件已经在昨天分享的数据文件夹里了,地图数据文件都是引用的同一个数据源)。

如果你能够获取这些代码文件,你只需要用excel打开对应省份.CSV文件,替换,继续存为.CSV就可以直接跑我给你的代码了,直接出图。

以上就是R语言版数据地图是怎样的,小编相信有部分知识点可能是我们日常工作会见到或用到的。希望你能通过这篇文章学到更多知识。更多详情敬请关注亿速云行业资讯频道。

推荐阅读:
  1. 什么是r语言
  2. 数据库中E-R图是如何组成的

免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。

r语言

上一篇:如何测试JSP容器

下一篇:c语言怎么实现含递归清场版扫雷游戏

相关阅读

您好,登录后才能下订单哦!

密码登录
登录注册
其他方式登录
点击 登录注册 即表示同意《亿速云用户服务条款》