本站分享:AI、大数据、数据分析师培训认证考试,包括:Python培训Excel培训Matlab培训SPSS培训SAS培训R语言培训Hadoop培训Amos培训Stata培训Eviews培训

R语言:再谈REmap包_绘制各种图

r语言 cdadata 6158℃

R语言:再谈REmap包

关键词:r语言remap包R语言迁移图R语言颜色等级图R语言热力图R语言气泡图

之前写过一篇关于Remap的文章,原文链接为:http://www.cdadata.com/17939
但有许多网友都存在不同的问题,在我的微信公众号后台或博客留言,想我请教一些问题。于是我就觉得很有必要在写一篇文章,好好的把Remap这个包好好的给大家介绍一下。


我们都应该知道这个包的主要目的可交互的地图数据可视化的工具,托管在github,现在.这个包是基于Echarts开发的一个包,它本身提供的参数也比较少,也就是说你想绘制很个性更有特点的图像的话,那你就很有必要去学习了解Echarts
方面的知识。
1.迁移图

比如说放假了我准备出去玩玩。我先从西安出发,到上海看看东方明珠,再到重庆尝一尝火锅,在成都逛逛宽窄巷子,最后再返回西安吃碗羊肉泡馍。这个行程图就可以用这个包来做。

origin<-c("xi an","shang hai","chong qing","cheng du")
destination<-c("shang hai","chong qing","cheng du","xi an")
#将上面这两列数据存储在一个数据框里面
dat = data.frame(origin,destination)
out = remap(dat,title = "REmap",subtitle = "theme:Dark")
plot(out)

在使用remap函数时,它会调用get_geo_position函数来获取坐标。

结果如下;

R语言:再谈REmap包_hui

 

我们来查看一下dat的数据类型:

R语言:再谈REmap包_hui

不过这个包有一个很严重的问题,就是你输入中文的时候,它有时候无法识别,不过幸好当你输入地名的时候可以使用拼音,也不区分大小写,比如输入西安的时候,你可以输入”xi an”也可以写成”xi
an shi’

如果你出现类似下面这些错误提示,那就要检查你的位置写的是不是汉字了。

Warning message:
In get_geo_position(city_vec) :
  北京 not found.上海 not found.重庆 not found.成都 not found.
Warning message:
In get_geo_position(city_vec) : ±±¾© not found.

2.颜色等级图

city<-c("上海","重庆","四川","陕西")
value<-c(3734,3248,2361,2105)
Cdata<-data.frame(city,value)
remapC(Cdata,maptype = "China",color = 'skyblue')

结果如下:

R语言:再谈REmap包_hui

数据格式如下:

R语言:再谈REmap包_hui

(数据是随便写的)

如果说我们既想在颜色等级图上面添加迁移图特点的话,那我们就要用到markLineData和markPointData这两个参数,它们默认为NULL。如下例所示:

添加气泡:

remapC(Cdata,maptype = "China",color = 'skyblue',markPointData=dat)

R语言:再谈REmap包_hui

添加箭头:

remapC(Cdata,maptype = "China",color = 'skyblue',markLineData=dat)

R语言:再谈REmap包_hui

如果说既要 有箭头,又要 气泡,那就把这两个参数都加进来。

remapC(Cdata,maptype = "China",color = 'skyblue',markLineData=dat,,markPointData=dat)

R语言:再谈REmap包_hui

热力图

city<-c("xi an","shang hai","chong qing","cheng du")
heat<-c(0.9,0.6,0.8,0.7)
temp <- get_geo_position(as.vector(city))  #获取坐标
heatdata<-data.frame(temp$lon,temp$lat,heat)

 

这部分通过get_geo_position()函数获取了坐标,再转化为一个有三列的数据框,分别为经纬度和热度。

R语言:再谈REmap包_hui

热力图绘制如下:

remapH(heatdata,minAlpha = 0.51,title = "Heat Map from REmap")

R语言:再谈REmap包_hui

个人愚见,如有不到之处,希望各位能在评论区多多提意见。

转载请注明:数据分析 » R语言:再谈REmap包_绘制各种图

喜欢 (2)or分享 (0)