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 #將地圖呈現出來

下圖為結果展示

轉自Hellolijunshy的CSDN部落格，如有侵權，聯絡刪除!