
Last chance! 50% off unlimited learning
Sale ends in
Given a point pattern and a set of predictors, find a minimal set of new predictors, each constructed as a linear combination of the original predictors.
sdr(X, covariates, method = c("DR", "NNIR", "SAVE", "SIR", "TSE"),
Dim1 = 1, Dim2 = 1, predict=FALSE)
A point pattern (object of class "ppp"
).
A list of pixel images (objects of class "im"
)
to serve as predictor variables.
Character string indicating which method to use. See Details.
Dimension of the first order Central Intensity Subspace
(applicable when method
is "DR"
, "NNIR"
,
"SAVE"
or "TSE"
).
Dimension of the second order Central Intensity Subspace
(applicable when method="TSE"
).
Logical value indicating whether to compute the new predictors as well.
A list with components B, M
or B, M1, M2
where
B
is a matrix whose columns are estimates of the basis vectors
for the space, and M
or M1,M2
are matrices containing
estimates of the kernel.
If predict=TRUE
, the result also includes a component
Y
which is a list of pixel images giving the values of the
new predictors.
Given a point pattern
Available methods are:
method="DR" |
directional regression |
method="NNIR" |
nearest neighbour inverse regression |
method="SAVE" & sliced average variance estimation |
method="SIR" & sliced inverse regression |
method="TSE" & two-step estimation |
method="DR" |
The result includes a matrix B
whose columns are estimates
of the basis vectors of the space of new predictors. That is,
the j
th column of B
expresses the j
th new
predictor as a linear combination of the original predictors.
If predict=TRUE
, the new predictors are also evaluated.
They can also be evaluated using sdrPredict
.
Guan, Y. and Wang, H. (2010) Sufficient dimension reduction for spatial point processes directed by Gaussian random fields. Journal of the Royal Statistical Society, Series B, 72, 367--387.
sdrPredict
to compute the new predictors from the
coefficient matrix.
dimhat
to estimate the subspace dimension.
# NOT RUN {
A <- sdr(bei, bei.extra, predict=TRUE)
A
Y1 <- A$Y[[1]]
plot(Y1)
points(bei, pch=".", cex=2)
# investigate likely form of dependence
plot(rhohat(bei, Y1))
# }
Run the code above in your browser using DataLab