Skip to content

monitoring convergence in gamm4 (with the new lmer-1.0-4 modular functionality)

1 message · Steve Walker

#
Hi again Damian,

Here is an (admittedly ugly) workaround...until this issue gets properly 
fixed:

library(gamm4)
dat <- gamSim(1,n=600,dist="binary",scale=.33)
trace(gamm4, quote(browser()), at = 53)
lr.fit0 <- gamm4(y~s(x0)+s(x1)+s(x2),
                  family=binomial,data=dat,
                  verbose=1L)
devfun <- do.call(mkGlmerDevfun, b)
opt <- optimizeGlmer(devfun, ...)
devfun <- updateGlmerDevfun(devfun, b$reTrms) # remove ...
opt <- optimizeGlmer(devfun, stage = 2, ...)


For anyone who is interested, I think the problem is that `gamm4` calls 
`updateGlmerDevfun` with a `...` argument:

https://github.com/lme4/lme4/issues/135#issuecomment-25114347

Steve
On 2013-09-25 2:31 PM, Steve Walker wrote: