使用 ggmap、ggplot2 和 ggsn 和 googlemap 在地图上绘制位置

问题描述

我正在尝试按照以下代码绘制地图。我把所有的图都正确地添加到“最终”，这是添加方向。但是每当我尝试添加比例尺时，我都没有得到图，它就像空白，只有比例和北符号。请帮忙。

library(ggplot2)
library(ggmap)
library(ggsn)
map <- get_googlemap(c(89.0,24.0),zoom = 7,maptype = "terrain")
M<-ggmap(map)
M

M+geom_point(data = Map,aes(x=Longitude,y=Latitude),size=3)

Final<-M+geom_point(data = Map,y=Latitude,color=SoilAs),size=4)+ scale_colour_viridis_c(option = "cividis")+
                              north2(Final,x=.30,y=.9,symbol=16)
Final

FinalMap<-Final+scalebar(x.min = 83.0,x.max = 93,y.min = 20.33,y.max = 27.5,dist =500,dist_unit = "km",transform = TRUE,model = "wgs84")
FinalMap

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）