diff --git a/mlm/contributing_did_model_fit.R b/mlm/contributing_did_model_fit.R index 1952b16..f3efc61 100644 --- a/mlm/contributing_did_model_fit.R +++ b/mlm/contributing_did_model_fit.R @@ -16,9 +16,16 @@ library(lme4) library(optimx) library(lattice) -all_gmodel <- glmer.nb(log1p_count ~ before_after * week_index + scaled_age + (before_after * week_index | project_id), - control=glmerControl(optimizer="bobyqa", - optCtrl=list(maxfun=2e5)), nAGQ=0, - data=contributing_df) - +#all_gmodel <- glmer.nb(log1p_count ~ before_after * week_index + scaled_age + (before_after * week_index | project_id), +# control=glmerControl(optimizer="bobyqa", +# optCtrl=list(maxfun=2e5)), nAGQ=0, +# data=contributing_df) + summary(all_gmodel) +#saveRDS(all_gmodel, "020125_contributing_model.rda") +model_residuals <- residuals(all_gmodel) +acf(model_residuals) +vif(all_gmodel) + +#getting between-group variance +variance_components <- as.data.frame(VarCorr(all_gmodel)) diff --git a/mlm/models/020125_contributing_model.rda b/mlm/models/020125_contributing_model.rda new file mode 100644 index 0000000..aea3643 Binary files /dev/null and b/mlm/models/020125_contributing_model.rda differ