Z=0 and R=0, MARSSkfss problem

[eeholmes]

#This fits
test = MARSS(cumsum(rnorm(100)), model=list(Z=matrix(0), A="zero", x0="zero"))

#This doesn't
test = MARSS(cumsum(rnorm(100)), model=list(Z=matrix(0), A="zero", x0="zero", R="zero"))

[eeholmes]

This works

dat <- t(harborSealWA)
dat <- dat[2:3, 6:22] # remove the year row
test = MARSS(dat, model=list(Z=diag(0,2), A="zero", x0="zero"))

[eeholmes]

Not so sure this is really a bug.