# \donttest{
data(seizures)
head(seizures)
star <-list(phi=1, beta0=1, beta1=1, beta2=1, beta3=1)
global.MNB(formula=Y ~ trt + period +
trt:period + offset(log(weeks)),star=star,dataSet=seizures,plot=FALSE)
# }
Run the code above in your browser using DataLab