mgaughan/govdoc-cr-analysis
1
0
Fork 0
Code

fit contributing did

Browse Source
This commit is contained in:
Matthew Gaughan 2025-02-02 13:40:49 -08:00
parent 3c4ea14c81
commit 223afbe8e8
2 changed files with 12 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
mlm/contributing_did_model_fit.R
View File

@ -16,9 +16,16 @@ library(lme4)
library(optimx) library(optimx)
library(lattice) library(lattice)
all_gmodel <- glmer.nb(log1p_count ~ before_after * week_index + scaled_age + (before_after * week_index | project_id), #all_gmodel <- glmer.nb(log1p_count ~ before_after * week_index + scaled_age + (before_after * week_index | project_id),
control=glmerControl(optimizer="bobyqa", # control=glmerControl(optimizer="bobyqa",
optCtrl=list(maxfun=2e5)), nAGQ=0, # optCtrl=list(maxfun=2e5)), nAGQ=0,
data=contributing_df) # data=contributing_df)
summary(all_gmodel) 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))

BIN
mlm/models/020125_contributing_model.rda Normal file
View File

Binary file not shown.