在 R 中相交多边形，在 Spatstat 中导入多边形以进行空间聚类分析答案

【问题标题】：Intersecting Polygon in R, importing polygon for Spatial Clustering Analysis in Spatstat在 R 中相交多边形，在 Spatstat 中导入多边形以进行空间聚类分析
【发布时间】：2017-05-10 07:19:26
【问题描述】：

我正在尝试使用readShapePoly 命令将多边形导入R，并使用as(filename,"owin") 将多边形转换为边框。我不断收到多边形包含重复顶点和自相交多边形的响应：

Polygon 1 contains duplicated vertices
Polygon 1 is self-intersecting
2, 3, 4, 5, 6, 7, 8, 9, 10.
done.
Polygon 1 contains duplicated vertices
Polygon 1 is self-intersecting
Checking for cross-intersection between 10 polygons...1, 2, 3, 4, 5, 6, 7, 8, 9.
done.
Error in owin(poly = opls) : 
  Polygon data contain duplicated vertices and self-intersection

我尝试使用 ArcGIS 中的修复几何功能清理多边形，但没有帮助。我能做什么？

【问题讨论】：

标签： r geospatial

【解决方案1】：

更新：您可以使用零宽度缓冲区以自动方式解决大多数此类问题。使用风险自负，如果不调查所涉及的数据，就无法知道这是否是明智的选择。

例如：

 gIsValid(gBuffer(p4, width = 0, byid = TRUE))
 [1] TRUE

原答案如下：

结束更新

您可能需要更好的工具来修复几何图形，或者自己手动调查问题。 rgeos 包可用于描述现有问题，您可以直观地识别它们发生的位置 - 然后直接在 R 中编辑它们或返回到您的 GIS 并在那里进行操作。这是gIsValid函数帮助中的一个简单示例：

library(rgeos)
p4 = readWKT("POLYGON ((0 40, 0 0, 40 40, 40 0, 0 40))")
gIsValid(p4, reason = TRUE)
[1] "Self-intersection[20 20]"

更改reason 返回值以获得更具描述性的警告：

gIsValid(p4)
[1] FALSE
Warning message:
In RGEOSUnaryPredFunc(spgeom, byid, "rgeos_isvalid") :
  Self-intersection at or near point 20 20

现在绘制多边形并突出显示问题点：

plot(p4, col = "grey")
points(20, 20, pch = 3, cex = 3, col = "red")
axis(1);axis(2);box()

由于您正在从 shapefile 读取，您可以使用 byid 参数来测试哪些多边形需要调查（尽管在本示例中它们都很好）：

library(maptools)
xx <- readShapePoly(system.file("shapes/sids.shp", package="maptools")[1],
  IDvar="FIPSNO", proj4string=CRS("+proj=longlat +ellps=clrk66"))
gIsValid(xx, byid = TRUE)
37001 37003 37005 37007 37009 37011 
 TRUE  TRUE  TRUE  TRUE  TRUE  TRUE
...

等等。

【讨论】：