## spatial binomial data
## Not run:
# data(malaria)
# D <- sp::spDists(cbind(malaria$x, malaria$y))/1000
# m <- gcmr(cbind(cases, size-cases) ~ netuse+I(green/100)+phc, data=malaria,
# marginal=binomial.marg, cormat=matern.cormat(D))
# res <- residuals(m)
# ## normal probability plot
# qqnorm(res)
# qqline(res)
# ## or better via plot.gcmr
# plot(m, which = 3)
# ## End(Not run)
Run the code above in your browser using DataLab