1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
\name{chop.linnet}
\alias{chop.linnet}
\title{
Divide a Linear Network into Tiles Using Infinite Lines
}
\description{
Given a linear network and a set of infinite lines,
divide the network into tiles demarcated by the lines.
The result is a tessellation of the network.
}
\usage{
chop.linnet(X, L)
}
\arguments{
\item{X}{
Linear network (object of class \code{"linnet"})
or data acceptable to \code{\link{as.linnet}}.
}
\item{L}{
Infinite line or lines (object of class \code{"infline"}).
}
}
\details{
The first line of \code{L} divides \code{X} into two tiles.
Subsequent lines divide each of these tiles. The result is a
tessellation of \code{X}. Tiles are not necessarily connected sets.
}
\value{
Tessellation on a linear network
(object of class \code{"lintess"}).
}
\author{
\adrian.
}
\seealso{
\code{\link{crossing.linnet}} to determine the crossing points
between the lines and the network.
\code{\link{divide.linnet}} to divide a network into a tessellation
using arbitrary cut points.
}
\examples{
L <- infline(p=runif(3), theta=runif(3, max=pi/2))
Y <- chop.linnet(simplenet, L)
plot(Y, main="")
plot(L, col="red")
}
\keyword{spatial}
\keyword{manip}
\concept{Linear network}
|
