大数跨境
0
0

R语言画地图的几篇文章记录

R语言画地图的几篇文章记录 小明的数据分析笔记本
2019-09-01
0
导读:可能会用到,先学着!


  • 1.、R地图系列(1):maptools包绘制中国地图

  • 2、R地图系列(2):maptools+ggplot2包添加地图元素

  • 3、生信技能树——使用R语言展示我们生信技能树全国巡讲的征程

  • 4、kaggle : Nuclear Power Plant Locations data

以下内容记录自己重复文章1和2的代码

install.packages("rgdal")
map<-rgdal::readOGR("../../practice/中国地图数据/bou2_4p.shp")
library(maps)
plot(map)
table(iconv(map$NAME))
plot(map[1,])
map_df<-fortify(map)
ggplot(data=map_df)+
  geom_polygon(aes(x=long,y=lat,group=group),
               fill="white",color="gray")
name<-c("杭州","上海","成都")
latitude<-c(30.27415,31.23037,30.5702)
longitude<-c(120.15515,121.4737,104.06476)
num<-c(100,70,60)
df<-data.frame(name,latitude,longitude,num)
ggplot(data=map_df)+
  geom_polygon(aes(x=long,y=lat,group=group),
               fill="white",color="gray")+
  geom_point(data=df,aes(x=longitude,y=latitude,
                         color=name),size=5)+
  theme_bw()+
  theme(axis.text = element_blank(),
        axis.ticks = element_blank(),
        axis.title = element_blank(),
        panel.border = element_blank(),
        legend.title = element_blank(),
        legend.position = c(0.2,0.2),
        legend.background = element_blank())
Figure1

Figure2

Figure3

Figure4

尝试向地图上添加箭头用来展示方向,但是图片一直显示不出来,暂时不知道如何解决。


ggplot2添加箭头https://ggplot2.tidyverse.org/reference/geom_segment.html

重复文章3的时候遇到了文章中提到的问题,提示用自己的百度API.用到的时候再来搜索如何设置API吧!


欢迎大家关注我的公众号

小明的数据分析笔记本


【声明】内容源于网络
0
0
小明的数据分析笔记本
分享R语言和python在生物信息领域做数据分析和数据可视化的简单小例子;偶尔会分享一些组学数据处理相关的内容
内容 971
粉丝 0
小明的数据分析笔记本 分享R语言和python在生物信息领域做数据分析和数据可视化的简单小例子;偶尔会分享一些组学数据处理相关的内容
总阅读218
粉丝0
内容971