在R(邻居)中查找相邻的多边形

Question

我开始使用SpatialPolygonsDataFrame,其中包含用于创建加纳地区地图的数据(可从http://www.diva-gis.org/datadown获取).我正在尝试创建一个矩阵,其中区域的名称为行和列名称,内部为0/1,以指示两个区域是否相邻(相邻).

我在spdep中发现了几个看起来很有希望的函数,但我无法弄清楚如何将它们用于此目的.我能够使用poly2nb创建一个包含数据的"nb"文件,但我不确定如何从这里开始,或者即使我在正确的轨道上.

我真的很感激任何帮助!谢谢!

Answer 1

我想你正在寻找gTouches:

library(rgeos)
library(rgdal)

# using http://data.biogeo.ucdavis.edu/data/diva/adm/GHA_adm.zip

ghana <- readOGR("GHA_adm", "GHA_adm1")

gTouches(ghana, byid=TRUE)

##       0     1     2     3     4     5     6     7     8     9
## 0 FALSE  TRUE  TRUE  TRUE FALSE FALSE FALSE FALSE FALSE  TRUE
## 1  TRUE FALSE FALSE  TRUE FALSE  TRUE FALSE FALSE  TRUE  TRUE
## 2  TRUE FALSE FALSE  TRUE  TRUE FALSE FALSE FALSE FALSE  TRUE
## 3  TRUE  TRUE  TRUE FALSE  TRUE FALSE FALSE FALSE  TRUE FALSE
## 4 FALSE FALSE  TRUE  TRUE FALSE FALSE FALSE FALSE  TRUE FALSE
## 5 FALSE  TRUE FALSE FALSE FALSE FALSE  TRUE  TRUE  TRUE FALSE
## 6 FALSE FALSE FALSE FALSE FALSE  TRUE FALSE  TRUE FALSE FALSE
## 7 FALSE FALSE FALSE FALSE FALSE  TRUE  TRUE FALSE FALSE FALSE
## 8 FALSE  TRUE FALSE  TRUE  TRUE  TRUE FALSE FALSE FALSE FALSE
## 9  TRUE  TRUE  TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE

快速浏览一下,它看起来是正确的:

我不确定您使用的是哪个加纳行政区文件,因此这是一个猜测,并且这些文件是按多边形顺序排列的,因此您需要ghana@data查看并将条目映射到管理区域名称.

Answer 2

请不要滥用rgeos.这不是一个令人满意的答案 - 没有地区名称.最初的问题在任何情况下都是微不足道的,就像spdep::nb2mat()这样(稍微关注矩阵行和列名称):

library(spdep)
library(sp)
ghana <- readRDS("GHA_adm1.rds")
row.names(ghana) <- as.character(ghana$NAME_1)
nb <- poly2nb(ghana)
mat <- nb2mat(nb, style="B")
colnames(mat) <- rownames(mat)
mat

使用rgeos::gTouches()可以工作,特别是如果使用returnDense=FALSE参数(即不返回矩阵),但如果需要捕捉则可能失败.spdep::poly2nb()是首选路由,因为它使捕捉成为可能,并且因为nb S3类比矩阵更灵活.

可以spdep::poly2nb()使用输出来填充rgeos::gUnarySTRtreeQuery(),其提供具有重叠边界框的多边形列表作为候选邻居.这可以快速处理非常大的数据集.

您还可以在R-sig-geo上发布与R-spatial相关的问题.