rhohat(object, covariate, ...)
"rhohat"(object, covariate, ..., baseline=NULL, weights=NULL, method=c("ratio", "reweight", "transform"), horvitz=FALSE, smoother=c("kernel", "local"), dimyx=NULL, eps=NULL, n = 512, bw = "nrd0", adjust=1, from = NULL, to = NULL, bwref=bw, covname, confidence=0.95)
"rhohat"(object, covariate, ..., baseline=NULL, weights=NULL, method=c("ratio", "reweight", "transform"), horvitz=FALSE, smoother=c("kernel", "local"), dimyx=NULL, eps=NULL, n = 512, bw = "nrd0", adjust=1, from = NULL, to = NULL, bwref=bw, covname, confidence=0.95)
"rhohat"(object, covariate, ..., weights=NULL, method=c("ratio", "reweight", "transform"), horvitz=FALSE, smoother=c("kernel", "local"), dimyx=NULL, eps=NULL, n = 512, bw = "nrd0", adjust=1, from = NULL, to = NULL, bwref=bw, covname, confidence=0.95)
"rhohat"(object, covariate, ..., weights=NULL, method=c("ratio", "reweight", "transform"), horvitz=FALSE, smoother=c("kernel", "local"), nd=1000, eps=NULL, random=TRUE, n = 512, bw = "nrd0", adjust=1, from = NULL, to = NULL, bwref=bw, covname, confidence=0.95)
"rhohat"(object, covariate, ..., weights=NULL, method=c("ratio", "reweight", "transform"), horvitz=FALSE, smoother=c("kernel", "local"), nd=1000, eps=NULL, random=TRUE, n = 512, bw = "nrd0", adjust=1, from = NULL, to = NULL, bwref=bw, covname, confidence=0.95)
"ppp"
or "lpp"
),
a quadrature scheme (object of class "quad"
)
or a fitted point process model (object of class "ppm"
or "lppm"
).
function(x,y)
or a pixel image (object of
class "im"
) providing the values of the covariate at any
location.
Alternatively one of the strings "x"
or "y"
signifying the Cartesian coordinates.
"im"
) or
a function(x,y)
providing the weights.
function(x,y)
or a pixel image (object of
class "im"
) providing the values of the baseline at any
location.
density.default
).
density.default
).
density.default
to
control the number and range of values at which the function
will be estimated.
bw
to use when smoothing
the reference density (the density of the covariate values
observed at all locations in the window).
density.default
or locfit
.
"fv"
)
containing the estimated values of $rho$ for a sequence
of values of $Z$.
Also belongs to the class "rhohat"
which has special methods for print
, plot
and predict
.
intensity.quadratcount
applied to the result of
quadratcount(X, tess=covariate)
.object
is a point pattern, and baseline
is missing or
null, this command assumes that object
is a realisation of a
Poisson point process with intensity function
$lambda(u)$ of the form
$$\lambda(u) = \rho(Z(u))$$
where $Z$ is the spatial
covariate function given by covariate
, and
$rho(z)$ is a function to be estimated. This command
computes estimators of $rho(z)$ proposed by Baddeley and
Turner (2005) and Baddeley et al (2012).The covariate $Z$ must have continuous values.
If object
is a point pattern, and baseline
is given,
then the intensity function is assumed to be
$$\lambda(u) = \rho(Z(u)) B(u)$$
where $B(u)$ is the baseline intensity at location $u$.
A smoothing estimator of the relative intensity $rho(z)$
is computed.
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(u)) \kappa(u)
$$
where $kappa(u)$ is the intensity of the fitted model
object
. A smoothing estimator of $rho(z)$ is computed.
The estimation procedure is determined by the character strings
method
and smoother
and the argument horvitz
.
The estimation procedure involves computing several density estimates
and combining them.
The algorithm used to compute density estimates is
determined by smoother
:
smoother="kernel"
,
each the smoothing procedure is based on
fixed-bandwidth kernel density estimation,
performed by density.default
.
smoother="local"
, the smoothing procedure
is based on local likelihood density estimation, performed by
locfit
.
The method
determines how the density estimates will be
combined to obtain an estimate of $rho(z)$:
method="ratio"
, then $rho(z)$ is
estimated by the ratio of two density estimates.
The numerator is a (rescaled) density estimate obtained by
smoothing the values $Z(y[i])$ of the covariate
$Z$ observed at the data points $y[i]$. The denominator
is a density estimate of the reference distribution of $Z$.
method="reweight"
, then $rho(z)$ is
estimated by applying density estimation to the
values $Z(y[i])$ of the covariate
$Z$ observed at the data points $y[i]$,
with weights inversely proportional to the reference density of
$Z$.
method="transform"
,
the smoothing method is variable-bandwidth kernel
smoothing, implemented by applying the Probability Integral Transform
to the covariate values, yielding values in the range 0 to 1,
then applying edge-corrected density estimation on the interval
$[0,1]$, and back-transforming.
If horvitz=TRUE
, then the calculations described above
are modified by using Horvitz-Thompson weighting.
The contribution to the numerator from
each data point is weighted by the reciprocal of the
baseline value or fitted intensity value at that data point;
and a corresponding adjustment is made to the denominator.
The covariate will be evaluated on a fine grid of locations,
with spatial resolution controlled by the arguments
dimyx,eps,nd,random
.
In two dimensions (i.e.
if object
is of class "ppp"
, "ppm"
or
"quad"
) the arguments dimyx, eps
are
passed to as.mask
to control the pixel
resolution. On a linear network (i.e. if object
is of class
"lpp"
) the argument nd
specifies the
total number of test locations on the linear
network, eps
specifies the linear separation between test
locations, and random
specifies whether the test locations
have a randomised starting position.
If the argument weights
is present, then the contribution
from each data point X[i]
to the estimate of $rho$ is
multiplied by weights[i]
.
rho2hat
,
methods.rhohat
,
parres
. See ppm
for a parametric method for the same problem.
X <- rpoispp(function(x,y){exp(3+3*x)})
rho <- rhohat(X, "x")
rho <- rhohat(X, function(x,y){x})
plot(rho)
curve(exp(3+3*x), lty=3, col=2, add=TRUE)
rhoB <- rhohat(X, "x", method="reweight")
rhoC <- rhohat(X, "x", method="transform")
fit <- ppm(X, ~x)
rr <- rhohat(fit, "y")
# linear network
Y <- runiflpp(30, simplenet)
rhoY <- rhohat(Y, "y")
Run the code above in your browser using DataLab