R语言:根据经纬度在世界地图上画出各个点

 “ljs.csv”的文件内容:

mydata<-read.table("ljs.csv",header=TRUE,sep=",")  #导入自己的名字为“ljs.csv”文件

visit.x<-mydata$longitude

visit.y<-mydata$latitude #数据准备

library(ggplot2)

library(ggmap)

library(sp)

library(maptools)

library(maps)

mp<-NULL #定义一个空的地图

mapworld<-borders("world",colour = "gray50",fill="white") #绘制基本地图

mp<-ggplot()+mapworld+ylim(-60,90)

#利用ggplot呈现,同时地图纵坐标范围从-60到90

mp2<-mp+geom_point(aes(x=visit.x,y=visit.y,size=mydata$number),color="darkorange")+scale_size(range=c(1,1))

#绘制带点的地图,geom_point是在地图上绘制点,x轴为经度信息,y轴为纬度信息,size是将点的大小按照收集的个数确定,color为暗桔色,scale_size是将点变大一些

mp3<-mp2+theme(legend.position = "none") #将图例去掉

mp3 #将地图呈现出来

下图为结果展示

猜你喜欢

转载自blog.csdn.net/Hellolijunshy/article/details/82715117