如何测量SpatialLines对象的相似性
我SpatialLines在R:中创建了两个对象。 这些对象是通过以下方式创建的: library(sp) xy <- cbind(x,y) xy.sp = sp::SpatialPoints(xy) spl1 <- sp::SpatialLines(list(Lines(Line(xy.sp), ID="a"))) 现在,我想以某种方式得出结论,这是旋转和翻转的同一条线,并且它们之间的差等于0(即形状相等)。 为此,可以使用maptools包装并旋转第1行,例如: spl180 <- maptools::elide(spl1, rotate=180) 然后必须使用rgeos包装将每条旋转的线与2号线进行比较,例如: hdist <- rgeos::gDistance(spl180, spl2, byid=FALSE, hausdorff=TRUE) 但是,这是计算SpatialLines对象匹配的昂贵方法,尤其是在对象数约为1000的情况下。 有什么聪明的方法可以完成这项工作吗? PS此外,上述方法不能保证所有可能的旋转和翻转。 P.S2。如果#1线相对于#2缩小,则#1和#2之间的差必须仍等于0。 更新: