## Fit a Poisson GLMM with adjacency correlation model
data(scotlip) ## loads 'scotlip' data frame, but also 'Nmatrix'
corrHLfit(cases~I(prop.ag/10) +adjacency(1|gridcode)+offset(log(scotlip$expec)),
data=scotlip,family=poisson(),
adjMatrix=Nmatrix,lower=list(rho=0),upper=list(rho=0.1745))
## Adding a Gamma random effect to fit a negative-binomial response:
corrHLfit(cases~I(prop.ag/10) +(1|gridcode)+adjacency(1|gridcode)
+offset(log(scotlip$expec)),
data=scotlip,family=poisson(),rand.family=list(Gamma(log),gaussian()),
adjMatrix=Nmatrix,lower=list(rho=0),upper=list(rho=0.1745))
## fit non-spatial crossed random effects with distinct families
data(salamander)
HLfit(cbind(Mate,1-Mate)~1+(1|Female)+(1|Male),family=binomial(),
rand.family=list(gaussian(),Beta(logit)),data=salamander,HLmethod="ML")
## Nested effects
# lmer syntax allowing several degrees of nesting
HLfit(cbind(Mate,1-Mate)~1+(1|Female/Male),
family=binomial(),rand.family=Beta(logit),data=salamander,HLmethod="ML")
# A syntax described in ?formula
HLfit(cbind(Mate,1-Mate)~1+(1|Female)+(1|Male %in% Female),
family=binomial(),rand.family=Beta(logit),data=salamander,HLmethod="ML")
## fit a non-spatial, Gamma GLMM:
data(wafers)
HLfit(y ~X1*X3+X2*X3+I(X2^2)+(1|batch),family=Gamma(log),
data=wafers)
## Same with fixed-effects predictor for residual variance
## ( = structured-dispersion model):
HLfit(y ~X1*X3+X2*X3+I(X2^2)+(1|batch),family=Gamma(log),
resid.formula = ~ X3+I(X3^2) ,data=wafers)
## Random-slope model (mind the output!)
HLfit(y~X1+(X2|batch),data=wafers)
## fit a GLM (not mixed) with structured dispersion:
HLfit( y ~X1+X2+X1*X3+X2*X3+I(X2^2),family=Gamma(log),
resid.formula = ~ X3+I(X3^2) ,data=wafers)
## Fit of binary data using PQL/L. See ?arabidopsis
data(arabidopsis)
HLCor(cbind(pos1046738,1-pos1046738)~seasonal+Matern(1|LAT+LONG),
ranPars=list(rho=0.129,lambda=4.28,nu=0.291),
family=binomial(),HLmethod="PQL/L",data=arabidopsis)
Run the code above in your browser using DataLab