edge.Ripley(X, r, W = X$window, method = "C", maxweight = 100)
"ppp"
)."interpreted"
or "C"
.
This is needed only for debugging purposes.For a single point $x$ in a window $W$, and a distance $r > 0$, the isotropic edge correction weight is $$e(u, r) = \frac{2\pi r}{\mbox{length}(c(u,r) \cap W)}$$ where $c(u,r)$ is the circle of radius $r$ centred at the point $u$. The denominator is the length of the overlap between this circle and the window $W$.
The function edge.Ripley
computes this edge correction weight
for each point in the point pattern X
and for each
corresponding distance value in the vector or matrix r
.
If r
is a vector, with one entry for each point in
X
, then the result is a vector containing the
edge correction weights e(X[i], r[i])
for each i
.
If r
is a matrix, with one row for each point in X
,
then the result is a matrix whose i,j
entry gives the
edge correction weight e(X[i], r[i,j])
.
For example edge.Ripley(X, pairdist(X))
computes all the
edge corrections required for the $K$-function.
If any value of the edge correction weight exceeds maxwt
,
it is set to maxwt
.
edge.Trans
,
Kest
v <- edge.Ripley(cells, pairdist(cells))
Run the code above in your browser using DataLab