[R-sig-ME] lme4 at flexLambda Error

[bbonit at tin.it]

Deal list, 
I have installed  this version of lme4
https://github.com/lme4/lme4/tree/flexLambda

following the example i have fitted m <-  flexLmer(y ~ time + ar1d(~(time|id)), data=fr)
but one error arise:

Error in .Call(merPredDCreate, as(X, "matrix"), Lambdat, LamtUt, RZX,  : 
Incorrect number of arguments (15), expecting 17 for 'merPredDCreate'

What does it means ?  I can resolve i?

Thank in advance
Bonitta Gianluca

set.seed(2352)
nsubj <- 20
nreps <- 2
length <- 20
n <- nsubj*nreps*length
fr <- expand.grid(
    time=1:length,
    id=factor(1:nsubj),
    rep=factor(1:nreps))

rho <- .8
sd.b <- 3
b <- sd.b * as.vector(replicate(nsubj, arima.sim(n=length, model=list(ar=c(rho)))))              
sd.eps <- 1
beta <- .5
fr <- within(fr,{
    mu <- beta*time
    y <- mu + model.matrix(~0+as.factor(time):id)%*%b + 
        rnorm(n, sd=sd.eps)
})

m <-  flexLmer(y ~ time + ar1d(~(time|id)), data=fr)
 
	[[alternative HTML version deleted]]