Displaying 1 result from an estimated 1 matches for "ranintvar".
2009 Jun 22
1
Problem with storing a sequence of lmer() model fit into a list
...------------------------------------------------------------------
fit.list<-NULL
for (i in seq_along(depvar_vec))
{
#I found that s_sex, ses1 and race are not useful
fit_i <- lmer(as.formula(gen.ranpoisson.fml.jh(depvar_vec[i],
offsetvar ,factorindepvars, nonfactorindepvars ,ranintvar )),
family=quasipoisson(link="log"),verbose=F, data=indf)
tmp_i<-paste('ranpoi_', depvar_vec[i], sep='')
fit.list[[tmp_i]] <- fit_i
#assign also does not work
#assign(fit.list$parse(text = tmp_i), fit_i)
}
--------------------------------...