For a point process model that has been fitted to multiple point patterns, these functions extract the log likelihood and AIC, or analogous quantities based on the pseudolikelihood.
# S3 method for mppm
logLik(object, …, warn=TRUE) # S3 method for mppm
AIC(object, …, k=2, takeuchi=TRUE)
# S3 method for mppm
extractAIC(fit, scale = 0, k = 2, …, takeuchi = TRUE)
# S3 method for mppm
nobs(object, …)
# S3 method for mppm
getCall(x, …)
# S3 method for mppm
terms(x, …)
Fitted point process model (fitted to multiple point
patterns). An object of class "mppm"
.
Ignored.
If TRUE
, a warning is given when the
pseudolikelihood is returned instead of the likelihood.
Ignored.
Numeric value specifying the weight of the equivalent degrees of freedom in the AIC. See Details.
Logical value specifying whether to use the Takeuchi penalty
(takeuchi=TRUE
) or the
number of fitted parameters (takeuchi=FALSE
)
in calculating AIC.
See the help files for the corresponding generic functions.
These functions are methods for the generic commands
logLik
,
AIC
,
extractAIC
,
terms
and
getCall
for the class "mppm"
.
An object of class "mppm"
represents a fitted
Poisson or Gibbs point process model fitted to several point patterns.
It is obtained from the model-fitting function mppm
.
The method logLik.mppm
extracts the
maximised value of the log likelihood for the fitted model
(as approximated by quadrature using the Berman-Turner approximation).
If object
is not a Poisson process, the maximised log
pseudolikelihood is returned, with a warning.
The Akaike Information Criterion AIC for a fitted model is defined as
$$
AIC = -2 \log(L) + k \times \mbox{penalty}
$$
where \(L\) is the maximised likelihood of the fitted model,
and \(\mbox{penalty}\) is a penalty for model complexity,
usually equal to the effective degrees of freedom of the model.
The method extractAIC.mppm
returns the analogous quantity
\(AIC*\) in which \(L\) is replaced by \(L*\),
the quadrature approximation
to the likelihood (if fit
is a Poisson model)
or the pseudolikelihood (if fit
is a Gibbs model).
The \(\mbox{penalty}\) term is calculated
as follows. If takeuchi=FALSE
then \(\mbox{penalty}\) is
the number of fitted parameters. If takeuchi=TRUE
then
\(\mbox{penalty} = \mbox{trace}(J H^{-1})\)
where \(J\) and \(H\) are the estimated variance and hessian,
respectively, of the composite score.
These two choices are equivalent for a Poisson process.
The method nobs.mppm
returns the total number of points
in the original data point patterns to which the model was fitted.
The method getCall.mppm
extracts the original call to
mppm
which caused the model to be fitted.
The method terms.mppm
extracts the covariate terms in the
model formula as a terms
object. Note that these terms do not
include the interaction component of the model.
The R function step
uses these methods.
Baddeley, A., Rubak, E. and Turner, R. (2015) Spatial Point Patterns: Methodology and Applications with R. London: Chapman and Hall/CRC Press.
# NOT RUN {
fit <- mppm(Bugs ~ x, hyperframe(Bugs=waterstriders))
logLik(fit)
AIC(fit)
nobs(fit)
getCall(fit)
# }
Run the code above in your browser using DataLab