230724_203658 india models for bad tweet clusters separately

- see [[230707_093829 india preliminary results - all bad tweet clusters|results for models with all clusters]] - see [[230725_1725447 all tweets or activity is lower in treatment group|lower activity in treatment group? (all tweets/activity results)]] - see [[230726_222706 bad tweet cluster effects - exclude inactive users - either based on t0 or t1 activity]] - [[230601_104229 india campaign data cluster info|cluster topic info]] - quasipoisson models - sociological heterogeneity ```r users: 514437 condition N 1: c 257133 2: t 257304 clustid tweets_in_clust 1: 0 2052740 2: 4 1100140 3: 6 189868 4: 7 19619 5: 8 681887 6: 9 1690166 7: 17 962410 ``` Bigger effect for purer clusters? Except cluster 8 ![[1690422199.png]] # exclude clusters 6 and 7 - retweets only ```r clustid tweets_in_clust 1: 0 2052740 2: 4 1100140 3: 6 189868 # exclude 4: 7 19619 # exclude 5: 8 681887 6: 9 1690166 7: 17 962410 ``` ```r # with interaction GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 3,519,229 Fixed-effects: block: 11,974, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.010060 0.007730 -1.301358 0.19316 t0SC 0.507953 0.001002 506.692323 < 2.2e-16 *** conditionC:t0SC -0.000151 0.001362 -0.110866 0.91172 --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.595123 # without interaction NOTE: 1,229/0 fixed-effects (81,830 observations) removed because of only 0 outcomes. GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 3,519,229 Fixed-effects: block: 11,974, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.011001 0.006500 -1.69246 0.090585 . t0SC 0.507954 0.001002 506.71744 < 2.2e-16 *** --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.595124 ``` # fit models to different clusters cluster 8 (0.78 pure) ```r > m1 <- feglm(t1 ~ conditionC * t0SC | block + day, d3, family = "quasipoisson", cluster = "block") NOTE: 2,664/0 fixed-effects (295,960 observations) removed because of only 0 outcomes. > m1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 3,305,099 Fixed-effects: block: 10,539, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.001627 0.011864 -0.137162 0.89091 t0SC 1.063567 0.003457 307.657889 < 2.2e-16 *** conditionC:t0SC 0.003527 0.004351 0.810736 0.41754 --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.434197 > m1.1 <- feglm(t1 ~ conditionC + t0SC | block + day, d3, family = "quasipoisson", cluster = "block") NOTE: 2,664/0 fixed-effects (295,960 observations) removed because of only 0 outcomes. > m1.1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 3,305,099 Fixed-effects: block: 10,539, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC 0.007888 0.010265 0.768482 0.44222 t0SC 1.063559 0.003457 307.663805 < 2.2e-16 *** --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.434195 ``` cluster 17 (0.70 pure) ```r > m1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 3,273,970 Fixed-effects: block: 10,386, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.015006 0.011944 -1.256335 0.20902 t0SC 0.891241 0.002844 313.371678 < 2.2e-16 *** conditionC:t0SC -0.000102 0.003523 -0.028941 0.97691 --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.436198 > > m1.1 <- feglm(t1 ~ conditionC + t0SC | block + day, d3, family = "quasipoisson", cluster = "block") NOTE: 2,817/0 fixed-effects (327,089 observations) removed because of only 0 outcomes. > m1.1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 3,273,970 Fixed-effects: block: 10,386, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.015357 0.010190 -1.50696 0.13185 t0SC 0.891241 0.002844 313.36066 < 2.2e-16 *** --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.436199 ``` cluster 4 (0.68 pure) ```r > m1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 3,354,827 Fixed-effects: block: 10,780, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.014275 0.011860 -1.203542 0.22879 t0SC 0.921877 0.002658 346.885072 < 2.2e-16 *** conditionC:t0SC 0.000575 0.003525 0.163076 0.87046 --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.465344 > > m1.1 <- feglm(t1 ~ conditionC + t0SC | block + day, d3, family = "quasipoisson", cluster = "block") NOTE: 2,423/0 fixed-effects (246,232 observations) removed because of only 0 outcomes. > m1.1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 3,354,827 Fixed-effects: block: 10,780, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.012319 0.009849 -1.25072 0.21106 t0SC 0.921874 0.002657 346.91781 < 2.2e-16 *** --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.465344 ``` cluster 9 (0.58 pure) ```r > m1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 3,399,550 Fixed-effects: block: 11,018, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.010779 0.010372 -1.039226 0.29872 t0SC 0.791249 0.002081 380.159024 < 2.2e-16 *** conditionC:t0SC 0.001675 0.002752 0.608584 0.54281 --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.501569 > > m1.1 <- feglm(t1 ~ conditionC + t0SC | block + day, d3, family = "quasipoisson", cluster = "block") NOTE: 2,185/0 fixed-effects (201,509 observations) removed because of only 0 outcomes. > m1.1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 3,399,550 Fixed-effects: block: 11,018, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.004035 0.008701 -0.463779 0.64282 t0SC 0.791243 0.002081 380.185560 < 2.2e-16 *** --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.50157 ``` cluster 0 (0.53 pure) ```r > m1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 3,430,868 Fixed-effects: block: 11,195, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.007873 0.009691 -0.812386 0.41659 t0SC 0.758520 0.001904 398.448019 < 2.2e-16 *** conditionC:t0SC 0.000298 0.002516 0.118262 0.90586 --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.504902 > > m1.1 <- feglm(t1 ~ conditionC + t0SC | block + day, d3, family = "quasipoisson", cluster = "block") NOTE: 2,008/0 fixed-effects (170,191 observations) removed because of only 0 outcomes. > m1.1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 3,430,868 Fixed-effects: block: 11,195, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.006629 0.008120 -0.816347 0.41432 t0SC 0.758519 0.001903 398.487425 < 2.2e-16 *** --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.5049 ``` cluster 7 (0.48 pure) ```r > m1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 746,431 Fixed-effects: block: 2,283, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC 0.008900 0.052782 0.168623 0.86611 t0SC 2.578597 0.047570 54.206855 < 2.2e-16 *** conditionC:t0SC -0.024284 0.061604 -0.394197 0.69347 --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.211047 > > m1.1 <- feglm(t1 ~ conditionC + t0SC | block + day, d3, family = "quasipoisson", cluster = "block") NOTE: 10,920/0 fixed-effects (2,854,628 observations) removed because of only 0 outcomes. > m1.1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 746,431 Fixed-effects: block: 2,283, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.005009 0.047600 -0.105225 0.91621 t0SC 2.578134 0.047467 54.314394 < 2.2e-16 *** --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.210877 ``` cluster 6 (0.18 pure) ```r > m1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 2,242,541 Fixed-effects: block: 6,840, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC -0.003660 0.025910 -0.141273 0.88766 t0SC 1.534260 0.010182 150.687903 < 2.2e-16 *** conditionC:t0SC 0.005491 0.013848 0.396521 0.69173 --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.363863 > > m1.1 <- feglm(t1 ~ conditionC + t0SC | block + day, d3, family = "quasipoisson", cluster = "block") NOTE: 6,363/0 fixed-effects (1,358,518 observations) removed because of only 0 outcomes. > m1.1 GLM estimation, family = quasipoisson, Dep. Var.: t1 Observations: 2,242,541 Fixed-effects: block: 6,840, day: 7 Standard-errors: Clustered (block) Estimate Std. Error t value Pr(>|t|) conditionC 0.007065 0.023573 0.299708 0.76441 t0SC 1.534322 0.010179 150.730529 < 2.2e-16 *** --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Squared Cor.: 0.363883 ```