Running examples in ‘logmult-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: svygnm
> ### Title: Fitting Generalized Nonlinear Models With Complex Survey Data
> ### Aliases: svygnm svygnm.svyrep.design
> ### Keywords: models nonlinear
> 
> ### ** Examples
> 
>   library(survey)
Loading required package: grid
Loading required package: Matrix
Loading required package: survival

Attaching package: ‘survey’

The following object is masked from ‘package:graphics’:

    dotchart

>   data(api)
>   dstrat<-svydesign(id=~1,strata=~stype, weights=~pw, data=apistrat, fpc=~fpc)
>   rstrat<-as.svrepdesign(dstrat)
>   glm.mod <- svyglm(api00~ell+meals+mobility, design=rstrat)
>   gnm.mod <- svygnm(api00~ell+meals+mobility, design=rstrat, ncpus=1)
........................................................................................................................................................................................................
>   # Both functions give the same result for GLMs
>   summary(glm.mod)

Call:
svyglm(formula = api00 ~ ell + meals + mobility, design = rstrat)

Survey design:
as.svrepdesign(dstrat)

Coefficients:
            Estimate Std. Error t value Pr(>|t|)    
(Intercept) 820.8873    10.5190  78.038   <2e-16 ***
ell          -0.4806     0.4060  -1.184    0.238    
meals        -3.1415     0.2939 -10.691   <2e-16 ***
mobility      0.2257     0.4515   0.500    0.618    
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1

(Dispersion parameter for gaussian family taken to be 1029221)

Number of Fisher Scoring iterations: 2

>   summary(gnm.mod)

Call:
svygnm.svyrep.design(formula = api00 ~ ell + meals + mobility, 
    design = rstrat, ncpus = 1)

Survey design:
as.svrepdesign(dstrat)

Coefficients:
            Estimate Std. Error t value Pr(>|t|)    
(Intercept) 820.8873    10.5190  78.038   <2e-16 ***
ell          -0.4806     0.4060  -1.184    0.238    
meals        -3.1415     0.2939 -10.691   <2e-16 ***
mobility      0.2257     0.4515   0.500    0.618    
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1

(Dispersion parameter for gaussian family taken to be 5146.106)

Number of iterations: 2

>   ## Don't show: 
>   stopifnot(all.equal(c(coef(glm.mod)), c(coef(gnm.mod))))
>   stopifnot(all.equal(c(vcov(glm.mod)), c(vcov(gnm.mod))))
>   stopifnot(all.equal(model.matrix(glm.mod), model.matrix(gnm.mod)))
>   stopifnot(all.equal(residuals(glm.mod), residuals(gnm.mod)))
Error: residuals(glm.mod) and residuals(gnm.mod) are not equal:
  Mean relative difference: 0.9292893
Execution halted