2

我希望有多个地图显示新西兰奥克兰的点值。问题是我有一个背景 shapefile（土地）来向地图添加背景细节，这意味着自由比例 xy 缩放到整个奥克兰地区，而不是点空间范围。

所以我的问题是：如何纯粹基于点层实现不同的空间范围并让 facet_wrap 忽略其他的？

这是当前代码：

map1 <- ggplot(walk, 
           aes(x=coords.x1, y=coords.x2, colour=UD_TOTAL, size=UD_TOTAL)
           ) +
      scale_colour_gradient(low="#003300", high="#00FF00", space="rgb") + 
      opts(panel.background=theme_rect(fill="#404040", colour = "#404040")) +
      quiet +
      pland + 
      geom_point() +
      facet_wrap(~School2, ncol=3, scales='free') 

map1

注意：这张地图试图模仿http://spatialanalysis.co.uk/2012/02/great-maps-ggplot2/

初学者很遗憾我无法发布图片。

4

1 回答 1

2

感谢 Charlotte Wickham 的建议，我发现了 facet wrap 忽略的新功能“annotation_map”。我没有在本书的研究中发现它，但可以在这里找到： http: //cran.r-project.org/web/packages/ggplot2/ggplot2.pdf。

更新后的代码是：

map1 <- ggplot(walk2, 
        aes(x=coords.x1, y=coords.x2, colour=UD_TOTAL, size=UD_TOTAL)) + 
        scale_colour_gradient(low="#003300", high="#00FF00", space="rgb") + 
        opts(panel.background=theme_rect(fill="#404040", colour = "#404040")) +
        annotation_map(BuiltEnv, fill="#4F4F4F", colour="#4F4F4F") +
        geom_point() +
        facet_wrap(~School2, ncol=3, scales='free') +
        coord_map(project="mercator")
map1
于 2012-05-30T22:24:42.477 回答