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

【问题标题】：Non-square (rectangular) maps in R-ggmapR-ggmap 中的非正方形（矩形）地图
【发布时间】：2015-09-27 17:53:15
【问题描述】：

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

我一直在使用 ggmap，据说你可以得到非平方地图，给出西下角和右上角的坐标。但是，实际上它似乎不起作用（报告了here和here）。

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

【问题讨论】：

【解决方案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

（我没有摆弄所说的初始缩放，但你应该能够理解。）

【讨论】：