R-ggmap中的非方形(矩形)贴图

Question

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

我一直在使用ggmap,据说你可以得到非方形地图,给出低西角和右上角坐标.然而,实际上它似乎不起作用(在这里和这里报道).

任何人都知道如何在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

而且,如果您愿意摆弄初始缩放设置然后裁剪(也许还有一些平铺粒度),您可以使用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

(我没有提到所说的初始变焦,但是你可以得到这个想法.)