lpp() 如何处理不完全落在线段上的点?

How does lpp() deal with points that don't fall exactly on a segment?

如果一个点的坐标没有恰好落在linnet object, how does lpp()句柄中的一条线段上呢?

它会掉线吗?或者捕捉到最近的线段?

它被“捕捉”(投影)到最近的线段,无论它有多远。 因此,您可能应该在调用 lpp 之前通过更多步骤准备数据。 下面是一个简单的例子,如果你的所有观点你都可以尝试模仿 在一个叫做 Xppp 中,你的 linnet 的主要成分叫做 L。 当然你需要调整距离阈值等,但希望它能帮助你 方向正确。

library(spatstat)

set.seed(42)
X <- runifpoint(10)
L <- simplenet

proj <- project2segment(X, as.psp(L))
i <- which(proj$d<.05)
Xclose <- X[i]
Xfinal <- lpp(Xclose, simplenet)

plot(L)
plot(X, add = TRUE, col = "red")
plot(Xclose, add = TRUE, pch = 2, col = "blue")

plot(Xfinal)