Given a spatial pattern of line segments, extrapolate the segments to infinite lines.
extrapolate.psp(x, …)
Spatial pattern of line segments (object of class "psp"
).
Ignored.
An object of class "infline"
representing the pattern of
infinite lines. See infline
for details of
structure.
Each line segment in the pattern x
is
extrapolated to an infinite line, drawn through its two endpoints.
The resulting pattern of infinite lines
is returned as an object of class "infline"
.
If a segment's endpoints are identical
(so that it has zero length)
the resulting infinite line is vertical (i.e. parallel to the
# NOT RUN {
X <- psp(runif(4), runif(4), runif(4), runif(4), window=owin())
Y <- extrapolate.psp(X)
plot(X, col=3, lwd=4)
plot(Y, lty=3)
Y
# }
Run the code above in your browser using DataLab