bw.relrisk(X, method = "likelihood", nh = 32)"ppp"
which has factor valued marks)."likelihood",
"leastsquares" or
"weightedleastsquares".sigma
to consider."bw.relrisk".relrisk.
Consider the indicators $y_{ij}$ which equal $1$ when
data point $x_i$ belongs to type $j$, and equal $0$
otherwise.
For a particular value of smoothing bandwidth,
let $\hat p_j(u)$ be the estimated
probabilities that a point at location $u$ will belong to
type $j$.
Then the bandwidth is chosen to minimise either the likelihood,
the squared error, or the approximately standardised squared error, of the
indicators $y_{ij}$ relative to the fitted
values $\hat p_j(x_i)$. See Diggle (2003). The result is a numerical value giving the selected bandwidth sigma.
The result also belongs to the class "bw.relrisk"
allowing it to be printed and plotted. The plot shows the cross-validation
criterion as a function of bandwidth.
relriskdata(urkiola)
b <- bw.relrisk(urkiola)
b
plot(b)Run the code above in your browser using DataLab