# NOT RUN {
data(DemoData2)
data(DemoMap2)
fit <- fitSpace(data=DemoData2, geo=DemoMap2$geo,
Amat=DemoMap2$Amat, family="binomial",
responseVar="tobacco.use", strataVar="strata",
weightVar="weights", regionVar="region",
clusterVar = "~clustid+id",
hyper=NULL, CI = 0.95)
# }
Run the code above in your browser using DataLab