## S3 method for class 'ppp':
pcf(X, \dots, r = NULL, kernel="epanechnikov", bw=NULL, stoyan=0.15,
correction=c("translate", "ripley"))
"ppp"
).density
.density
.density
."fv"
).
Essentially a data frame containing the variablesKest
for information
about $K(r)$. For a stationary Poisson process, the
pair correlation function is identically equal to 1. Values
$g(r) < 1$ suggest inhibition between points;
values greater than 1 suggest clustering.This routine computes an estimate of $g(r)$ by the kernel smoothing method (Stoyan and Stoyan (1994), pages 284--285). By default, their recommendations are followed exactly.
If correction="translate"
then the translation correction
is used. The estimate is given in equation (15.15), page 284 of
Stoyan and Stoyan (1994).
If correction="ripley"
then Ripley's isotropic edge correction
is used; the estimate is given in equation (15.18), page 285
of Stoyan and Stoyan (1994).
If correction=c("translate", "ripley")
then both estimates
will be computed.
The choice of smoothing kernel is controlled by the
argument kernel
which is passed to density
.
The default is the Epanechnikov kernel, recommended by
Stoyan and Stoyan (1994, page 285).
The bandwidth of the smoothing kernel can be controlled by the
argument bw
. Its precise interpretation
is explained in the documentation for density
.
For the Epanechnikov kernel, the argument bw
is
equivalent to $h/\sqrt{5}$.
Stoyan and Stoyan (1994, page 285) recommend using the Epanechnikov
kernel with support $[-h,h]$ chosen by the rule of thumn
$h = c/\sqrt{\lambda}$,
where $\lambda$ is the (estimated) intensity of the
point process, and $c$ is a constant in the range from 0.1 to 0.2.
See equation (15.16).
If bw
is missing, then this rule of thumb will be applied.
The argument stoyan
determines the value of $c$.
The argument r
is the vector of values for the
distance $r$ at which $g(r)$ should be evaluated.
There is a sensible default.
If it is specified, r
must be a vector of increasing numbers
starting from r[1] = 0
,
and max(r)
must not exceed half the diameter of
the window.
Kest
,
pcf
,
density
data(simdat)
<testonly>simdat <- simdat[seq(1,simdat$n, by=4)]</testonly>
p <- pcf(simdat)
plot(p, main="pair correlation function for simdat")
# indicates inhibition at distances r < 0.3
Run the code above in your browser using DataLab