Analysing spatial point patterns in R - CSIRO
Analysing spatial point patterns in R - CSIRO
Analysing spatial point patterns in R - CSIRO
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
108 Check<strong>in</strong>g a fitted Poisson model<br />
These residuals are closely related to the residuals for quadrat counts that were used above.<br />
Tak<strong>in</strong>g the set B to be one of our quadrats, the ‘observed’ quadrat count is n(x ∩ B). The<br />
‘expected’ quadrat count is ̂λarea(B) if the model is CSR, or more generally ∫ B ̂λ(u)du if the<br />
model is an <strong>in</strong>homogeneous Poisson process. Hence the ‘raw residual’ is observed -- expected<br />
= n(x ∩ B) − ∫ B ̂λ(u)du.<br />
16.2.2 Residual measure<br />
Equation (11) def<strong>in</strong>es the total residual for any region B, large or small.<br />
Intuitively the residuals can be visualised as an electric charge, with unit positive charge at<br />
each data <strong>po<strong>in</strong>t</strong>, and a diffuse negative charge at all other locations u, with density ˆλ(u). If the<br />
model is true, then these charges should approximately cancel.<br />
If we’d like to visualise this electric charge, one way is to plot the observed <strong>po<strong>in</strong>t</strong>s and the<br />
fitted <strong>in</strong>tensity function together:<br />
> data(bei)<br />
> fit plot(predict(fit))<br />
> plot(bei, add = TRUE, pch = "+")<br />
predict(fit)<br />
++<br />
++ +<br />
+<br />
++<br />
+<br />
++ +<br />
+++<br />
++<br />
+<br />
+++<br />
++ ++<br />
+<br />
++<br />
++ ++ ++ +<br />
+ ++ + ++++ ++<br />
++<br />
++<br />
+<br />
+ ++<br />
++ + +++<br />
+ + +<br />
+++<br />
+ ++ ++<br />
+<br />
+<br />
+++<br />
++ +<br />
+<br />
+<br />
++<br />
++<br />
++<br />
+ ++ +<br />
++ ++<br />
++<br />
++<br />
+++++ + ++ ++ + ++<br />
+++<br />
++ +<br />
++<br />
++<br />
+<br />
++<br />
++ ++ ++ ++ +<br />
++ ++ +<br />
+ + +<br />
++ + ++ ++++ + ++<br />
++<br />
+<br />
++<br />
+ ++<br />
++ +<br />
++ ++<br />
++<br />
++++ ++<br />
+++<br />
++ ++ ++<br />
++<br />
+ +++<br />
++ ++ + ++<br />
+<br />
++<br />
+++++ +<br />
++ ++<br />
++<br />
++ +<br />
+++<br />
++ + ++<br />
+ ++<br />
+ ++ +++<br />
++ +<br />
+++<br />
++<br />
++ +<br />
+<br />
+<br />
+ +<br />
+ +<br />
++<br />
+<br />
++ ++<br />
+++<br />
+++<br />
+++<br />
++<br />
+<br />
+++ ++++ +<br />
++<br />
+<br />
+ + + ++ ++ +<br />
++<br />
+<br />
+<br />
+<br />
++ ++ +<br />
+ ++++ +<br />
+ +<br />
+ +<br />
+++ ++ ++ + +<br />
+<br />
+ ++++ + + +<br />
+ + +<br />
++ +<br />
+ + +<br />
+<br />
+<br />
+<br />
+<br />
+ +<br />
+ +<br />
++<br />
+<br />
+++<br />
+<br />
+ ++<br />
+<br />
+<br />
+ ++ + +<br />
+ +<br />
+<br />
+ +<br />
+ +<br />
+<br />
+ ++ +<br />
+<br />
++ ++<br />
+<br />
+<br />
+<br />
+ +<br />
+<br />
+<br />
++<br />
+<br />
++<br />
+<br />
++<br />
+<br />
+++ ++<br />
+ ++<br />
+<br />
+++ ++ + +<br />
++ ++++<br />
++ + + +++<br />
+<br />
+<br />
++<br />
++<br />
++<br />
+<br />
+<br />
+ + +++ ++ +<br />
+ + + ++<br />
++<br />
++++ +<br />
++<br />
++<br />
++ ++ ++ +<br />
++ + +++<br />
+<br />
++<br />
++ ++<br />
+ ++ +<br />
++<br />
+<br />
++ ++ +<br />
+<br />
++ + ++<br />
+++<br />
++ ++ ++<br />
+<br />
+ + +<br />
+<br />
+++<br />
+<br />
+++<br />
++ ++ ++ + +<br />
++<br />
+<br />
++<br />
+<br />
++<br />
+<br />
+ ++<br />
+ + +<br />
+<br />
+ +<br />
+<br />
+<br />
+ + + +<br />
+ +<br />
+<br />
++ + + + +<br />
+<br />
+ + +<br />
+<br />
+ +<br />
+<br />
+<br />
++<br />
++++<br />
+<br />
+++ ++<br />
++<br />
+++ +++<br />
++<br />
++ +<br />
+ +<br />
+ + +++<br />
+ +<br />
++ ++<br />
+<br />
++ +<br />
+<br />
+ ++<br />
+<br />
++ ++ +<br />
++ ++<br />
++ + + + +++ ++<br />
+ +<br />
++++ + + +<br />
+<br />
+<br />
+<br />
++ + ++++++ +++ + ++<br />
+ ++ + +++<br />
+++<br />
+<br />
++ +<br />
+++ +++ + +<br />
+<br />
++<br />
++<br />
++<br />
++ + + +<br />
+<br />
+ +<br />
++<br />
+ + +<br />
+<br />
++<br />
+<br />
+<br />
+<br />
+ + + + ++<br />
+<br />
+<br />
+ +<br />
+ ++ +<br />
+<br />
+ +<br />
+ +<br />
+<br />
+ + +<br />
+<br />
++++<br />
+<br />
+<br />
+<br />
+ +<br />
+<br />
++<br />
+<br />
+<br />
+ ++ + +<br />
+<br />
+ ++<br />
+ +<br />
+<br />
++<br />
+ +<br />
+ + + +<br />
+<br />
+ +<br />
+<br />
++ +<br />
+ ++<br />
+<br />
+<br />
++<br />
+++<br />
++++ ++<br />
+<br />
++<br />
++<br />
++<br />
+++ +<br />
++<br />
+<br />
+++ +++ ++ +<br />
+<br />
+<br />
+<br />
+<br />
+<br />
+ +<br />
++<br />
++<br />
+<br />
+<br />
++ + + +<br />
+ +<br />
+ +++ ++ ++<br />
++<br />
++ ++++ +++<br />
+<br />
+<br />
++<br />
+<br />
+++<br />
++ + + ++ ++<br />
++ ++ +++<br />
++ +<br />
++<br />
+<br />
++ ++<br />
++ +<br />
+ +<br />
+<br />
++<br />
+++ ++ ++ +++<br />
++ ++++<br />
++<br />
++<br />
++<br />
+<br />
++<br />
+ ++ +<br />
++<br />
+ ++<br />
+ +++<br />
+ + +++<br />
++ ++ + + + +<br />
+ +<br />
+ ++ +<br />
+ +<br />
+ + ++ +<br />
+<br />
+<br />
+<br />
+<br />
+<br />
+ ++<br />
+<br />
+<br />
+<br />
+ +++ +<br />
++<br />
+<br />
++ + + +<br />
+<br />
+<br />
++<br />
+++<br />
++++<br />
++ +<br />
+<br />
+ ++ + + +<br />
+<br />
+ +<br />
+ + ++ +<br />
+<br />
+<br />
+ + +<br />
+ + + + ++<br />
+<br />
+ +<br />
+<br />
+ + + + +<br />
+<br />
+ +<br />
+<br />
+ + +<br />
+<br />
+ + ++ + + +<br />
++ +++<br />
+ + +<br />
+ + +<br />
++ +<br />
+ +<br />
+ +<br />
+ + + +<br />
0.004 0.006 0.008 0.01 0.012<br />
Each data <strong>po<strong>in</strong>t</strong> should be visualised as a charge of +1, while the colour image <strong>in</strong>dicates a<br />
negative charge density. If the model is true then these positive and negative charges should<br />
even out to zero.<br />
16.2.3 Smoothed residuals<br />
A more useful way to visualise the residuals is to smooth them.<br />
> data(bei)<br />
> fitx diagnose.ppm(fitx, which = "smooth")<br />
Smoothed raw residuals<br />
0.006<br />
0.005<br />
0.003<br />
0.004<br />
0.003<br />
0.002<br />
0.001<br />
0<br />
−0.001<br />
−0.002<br />
−0.003<br />
−0.004<br />
−0.003<br />
−0.002<br />
−0.001<br />
0<br />
0.001<br />
0.003<br />
0.002<br />
0.002<br />
0.001<br />
0<br />
−0.001<br />
0.004<br />
0.005<br />
0.006<br />
Copyright<strong>CSIRO</strong> 2010