29.01.2015 Views

Analysing spatial point patterns in R - CSIRO

Analysing spatial point patterns in R - CSIRO

Analysing spatial point patterns in R - CSIRO

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

172 Validation of fitted Gibbs models<br />

28.1 Goodness-of-fit test<strong>in</strong>g for Gibbs processes<br />

For a fitted Gibbs process, no theory is available to support the χ 2 goodness-of-fit test or the<br />

Kolmogorov-Smirnov test. The predicted mean number of <strong>po<strong>in</strong>t</strong>s <strong>in</strong> a given region is not known<br />

<strong>in</strong> closed form for a Gibbs process. Thus, the appropriate test statistic for a χ 2 test is not even<br />

available <strong>in</strong> closed form, let alone the null distribution of this statistic.<br />

Instead, goodness-of-fit for fitted Gibbs models often relies on the summary functions K and<br />

G. The command envelope will accept as its first argument a fitted Gibbs model, and will<br />

simulate from this model to determ<strong>in</strong>e the critical envelope.<br />

> plot(envelope(fit, Lest, nsim = 19, global = TRUE))<br />

envelope(fit, Lest, nsim=19, global=TRUE)<br />

L(r)<br />

0.00 0.05 0.10 0.15 0.20 0.25<br />

obs<br />

mmean<br />

hi<br />

lo<br />

0.00 0.05 0.10 0.15 0.20 0.25<br />

r<br />

Let’s subtract the theoretical Poisson value L(r) = r to get a more readable plot:<br />

> plot(envelope(fit, Lest, nsim = 19, global = TRUE), . - r ~ r)<br />

envelope(fit, Lest, nsim=19, global=TRUE)<br />

L(r) − r<br />

−0.02 −0.01 0.00 0.01 0.02<br />

obs<br />

mmean<br />

hi<br />

lo<br />

0.00 0.05 0.10 0.15 0.20 0.25<br />

r<br />

This is fairly consistent with a Strauss process.<br />

Copyright<strong>CSIRO</strong> 2010

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!