rho2hat(object, cov1, cov2, ..., method=c("ratio", "reweight"))"ppp"),
a quadrature scheme (object of class "quad")
or a fitted point process model (object of class "ppm").
function(x,y) or a pixel image (object of
class "im") providing the values of the covariate at any
location, or one of the strings "x" or "y"
signifying the Cartesian coordinates.
density.ppp to smooth
the scatterplots.
"im"). Also
belongs to the special class "rho2hat" which has a plot method.
rhohat.
If object is a point pattern, this command
produces a smoothed version of the scatterplot of
the values of the covariates cov1 and cov2
observed at the points of the point pattern. The covariates cov1,cov2 must have continuous values.
If object is a fitted point process model, suppose X is
the original data point pattern to which the model was fitted. Then
this command assumes X is a realisation of a Poisson point
process with intensity function of the form
$$
\lambda(u) = \rho(Z_1(u), Z_2(u)) \kappa(u)
$$
where $kappa(u)$ is the intensity of the fitted model
object, and $rho(z1, z2)$ is a function
to be estimated. The algorithm computes a smooth estimate of the
function $rho$.
The method determines how the density estimates will be
combined to obtain an estimate of $rho(z1, z2)$:
method="ratio", then $rho(z1,z2)$ is
estimated by the ratio of two density estimates.
The numerator is a (rescaled) density estimate obtained by
smoothing the points $(Z1(y[i]), Z2(y[i]))$
obtained by evaluating the two covariate $Z1, Z2$
at the data points $y[i]$. The denominator
is a density estimate of the reference distribution of
$(Z1, Z2)$.
method="reweight", then $rho(z1,z2)$ is
estimated by applying density estimation to the
points $(Z1(y[i]), Z2(y[i]))$
obtained by evaluating the two covariate $Z1, Z2$
at the data points $y[i]$,
with weights inversely proportional to the reference density of
$(Z1, Z2)$.
rhohat,
methods.rho2hat
data(bei)
attach(bei.extra)
plot(rho2hat(bei, elev, grad))
fit <- ppm(bei, ~elev, covariates=bei.extra)
## Not run:
# plot(rho2hat(fit, elev, grad))
# ## End(Not run)
plot(rho2hat(fit, elev, grad, method="reweight"))
Run the code above in your browser using DataLab