Finds any crossing points between the line segments in a line segment pattern.
selfcrossing.psp(A)
Line segment pattern (object of class "psp"
).
Point pattern (object of class "ppp"
).
This function finds any crossing points between
different line segments in the line segment pattern A
.
A crossing point occurs whenever one of the line segments in A
intersects another line segment in A
, at a nonzero
angle of intersection.
# NOT RUN {
a <- psp(runif(10), runif(10), runif(10), runif(10), window=owin())
plot(a, col="green", main="selfcrossing.psp")
P <- selfcrossing.psp(a)
plot(P, add=TRUE, col="red")
# }
Run the code above in your browser using DataLab