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

用户7010445

发布于 2020-03-03 14:54:36

7880

发布于 2020-03-03 14:54:36

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())