relrisk(X, sigma = NULL, ..., varcov = NULL, at = "pixels", casecontrol=TRUE)"ppp"
which has factor valued marks).bw.relrisk to select the
bandwidth, or passed to density.ppp to control the
pixel resolution.sigma.at="pixels") or
only at the points of X (at="points").X consists of only two types of points,
the result is a pixel image (if at="pixels")
or a vector of probabilities (if at="points"). If X consists of more than two types of points,
the result is:
at="pixels")
a list of pixel images, with one image for each possible type of point.
The result also belongs to the class"listof"so that it can
be printed and plotted.at="points")
a matrix of probabilities, with rows corresponding to
data points$x_i$, and columns corresponding
to types$j$.X is a bivariate point pattern
(a multitype point pattern consisting of two types of points)
then by default,
the points of the first type (the first level of marks(X))
are treated as controls or non-events, and points of the second type
are treated as cases or events. Then this command computes
the spatially-varying risk of an event,
i.e. the probability $p(u)$
that a point at spatial location $u$
will be a case. If X is a multitype point pattern with $m > 2$ types,
or if X is a bivariate point pattern
and casecontrol=FALSE,
then this command computes, for each type $j$,
a nonparametric estimate of
the spatially-varying risk of an event of type $j$.
This is the probability $p_j(u)$
that a point at spatial location $u$
will belong to type $j$.
If at = "pixels" the calculation is performed for
every spatial location $u$ on a fine pixel grid, and the result
is a pixel image representing the function $p(u)$
or a list of pixel images representing the functions
$p_j(u)$ for $j = 1,\ldots,m$.
If at = "points" the calculation is performed
only at the data points $x_i$. The result is a vector of values
$p(x_i)$ giving the estimated probability of a case
at each data point, or a matrix of values
$p_j(x_i)$ giving the estimated probability of
each possible type $j$ at each data point.
Estimation is performed by a simple Nadaraja-Watson type kernel
smoother (Diggle, 2003). If sigma and varcov
are both missing or null, then the smoothing bandwidth sigma
is selected by cross-validation using bw.relrisk.
bw.relrisk,
density.ppp,
smooth.ppp,
eval.im.
which.max.im.data(urkiola)
p <- relrisk(urkiola, 20)
if(interactive()) {
plot(p, main="proportion of oak")
plot(eval.im(p > 0.3), main="More than 30 percent oak")
data(lansing)
z <- relrisk(lansing)
plot(z, main="Lansing Woods")
plot(which.max.im(z), main="Most common species")
}Run the code above in your browser using DataLab