diff --git a/R/didAnalysis.R b/R/didAnalysis.R index eef22e2..7fdd41a 100644 --- a/R/didAnalysis.R +++ b/R/didAnalysis.R @@ -57,9 +57,8 @@ lmer_all_model <- lmer(count ~ D + I(week - 26) + D:I(week - 26) + scaled_projec summary(lmer_all_model) lmer_residuals <- residuals(lmer_all_model) qqnorm(lmer_residuals) -#if I'm reading the residuals right, the poisson is better? -# there's a conversation to be had between whether (D |upstream_vcs_link) or (D || upstream_vcs_link) -poisson_all_model <- glmer(count ~ D + I(week - 26) + D:I(week - 26) + scaled_project_age + (D |upstream_vcs_link), data=all_actions_data, family = poisson(link = "log")) +# https://www.bristol.ac.uk/cmm/learning/videos/random-intercepts.html#exvar +poisson_all_model <- glmer(count ~ D + I(week - 26) + D:I(week - 26) + scaled_project_age + (week |upstream_vcs_link), data=all_actions_data, family = poisson(link = "log")) summary(poisson_all_model) poisson_residuals <- residuals(poisson_all_model) qqnorm(poisson_residuals)