GGMap 显示为蓝色

Question

NBN_lat <- c(53.37074)
NBN_lon <- c(-1.40705)

NBN_mapcoord <- c(left = ((NBN_lat)-0.1), bottom = ((NBN_lon)-0.1), right =((NBN_lat+0.1)), top = (
(NBN_lon)+0.1))

NBN_map <- get_stamenmap(NBN_mapcoord, zoom = 5)
NBN_map

ggmap(NBN_map)

是我的代码，当我运行脚本this时会产生地图。

同时绘制珠穆朗玛峰的类似代码有效。 NBN_lat 和 NBN_lon 在数据框中有相关的数据值，所以我希望它可以正常绘制（我的代码与我发布的内容略有不同，因为它链接到 .csv 以提取 lon/lat 坐标。+0.1和 -0.1 我补充说认为它有助于生成地图数据，因为它会给我左/下和右/上两个不同的值。

library(ggmap)
library(mapproj)

bbox_everest <- c(left = 86.05, bottom = 27.21, right = 87.81, top = 28.76) #makes use of mapproj
map6 <- get_stamenmap(bbox_everest, zoom = 6)
ggmap(map6)

我知道 stamenmaps 没有完整的映射数据，但是当我搜索 Sheffield（坐标的位置）时，它出现在 stamenmaps 上。

谢谢！

Answer 1

你的地块是蓝色的，因为你不是在尝试绘制谢菲尔德，而是在尝试绘制印度洋。你在写NBN_mapcoord的时候倒置了经度和纬度的值。

如果你切换经度和纬度并增加分辨率，你会得到：

NBN_lon <- c(-1.40705)
NBN_lat <- c(53.37074)

NBN_mapcoord <- c(left  = ((NBN_lon) - 0.1), bottom = ((NBN_lat) - 0.1), 
                  right = ((NBN_lon + 0.1)), top    = ((NBN_lat) + 0.1))

NBN_map <- get_stamenmap(NBN_mapcoord, zoom = 12)

ggmap(NBN_map)