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

Question

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

我一直在使用ggmap，据说你可以得到非方形地图，给出低西角和右上角坐标。但是，实际上它似乎不起作用（报告here和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

并且，如果您愿意摆弄初始缩放设置＆amp;然后裁剪（也许，一些瓷砖颗粒度），你可以使用谷歌地图做到：

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

（我没有提到所说的初始变焦，但是你可以得到这个想法。）