R-ggmap 中的非方形（矩形）地图

Question

我需要在非方形地图中绘制空间数据。

我一直在使用 ggmap，据说您可以获得给出西下角和右上角坐标的非方形地图。然而，实际上它似乎不起作用（报告here and here）。

有人知道如何在 R/ggmap 中获取矩形地图吗？

Answer 1

如果您可以在没有 Google 地图的情况下生活，那么有简单、直接的替代方案（我已经包括 CloudMade，但我没有企业帐户）：

library(ggmap)

loc <- c(-96, 29.4, -94, 30.2)

# gmaps

tx_map_gmaps <- get_map(location=loc, source="google", maptype="terrain")
gg <- ggmap(tx_map_gmaps)
gg

# openstreetmap

tx_map_osm <- get_map(location=loc, source="osm")
gg <- ggmap(tx_map_osm)
gg

# stamen

tx_map_stamen <- get_map(location=loc, source="stamen", maptype="toner")
gg <- ggmap(tx_map_stamen)
gg

而且，如果您愿意 fiddle 使用初始缩放设置然后进行裁剪（可能还有一些平铺颗粒度），您可以使用Google 地图：

tx_map_gmaps <- get_map(location=loc, source="google", maptype="terrain")
gg <- ggmap(tx_map_gmaps)
gg <- gg + scale_y_continuous(limits=c(29.5, 30.0))
gg

（我没有 fiddle 说初始缩放，但你应该能明白这个想法。）

R-ggmap 中的非方形（矩形）地图

Non-square (rectangular) maps in R-ggmap

google-maps

r

ggmap