O caso de superdispersão, quando a variância é maior que a média, é o
mais comum e tem uma gama de métodos para análise mais extensa. A
superdispersão pode ocorrer pela ausência de covariáveis importantes,
excesso de zeros, diferentes amplitudes de domínio (\textit{offset}) não
consideradas, heterogeneidade de unidades amostrais, entre outros
\cite{RibeiroJr2012}. Para tais casos uma abordagem é a adoção de
modelos com efeitos aleatórios que capturam a variabilidade extra. Um
caso particular dos modelos Poisson de efeitos aleatórios, muito adotado
no campo aplicado da Estatística, ocorre quando consideramos
distribuição Gama para os efeitos aleatórios, nesta situação temos
expressão fechada para a função de probabilidade marginal, que assume a
forma Binomial Negativa.
Outra manifestação de fuga da suposição de equidispersão é a
subdispersão, situação menos comum na literatura. Os processos que
reduzem a variabilidade das contagens, abaixo do estabalecido pela
Poisson, não são tão conhecidos quanto os que produzem variabilidade
extra. Pela mesma razão, são poucas as abordagens descritas na
literatura que capazes de tratar a subdispersão, uma vez que efeitos
aleatórios só capturam a variabilidade extra. Podemos citar os modelos
de quasi-verossimilhança como a abordagem mais utilizada. Todavia não é
possível recuperar a verdadeira distribuição da variável resposta nessa
abordagem pois a modelagem é baseada apenas nos dois primeiros momentos
da distribuição condicional \cite{Paula2013}.
<<processo-pontual, fig.cap="Ilustração de diferentes tipos de processos pontuais. Da direita para esquerda temos processos sob padrões aleatório, aglomerado e uniforme", fig.height=3, fig.width=7>>=
mygrid <- expand.grid(xc = 1:3, yc = 1:3)
mygrid <- data.frame(mygrid)
sp::coordinates(mygrid) <- ~xc + yc
set.seed(20124689)
equi <- sp::spsample(mygrid, n = 100, type = "random")
over <- sp::spsample(mygrid, n = 100, type = "clustered", nclusters = 20)
## unde <- sp::spsample(mygrid, n = 100, type = "aligned")
unde <- sp::spsample(mygrid, n = 100, type = "stratified")