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 #将地图呈现出来

下图为结果展示

评论 16
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值