MT_w123_4_19_2022

0. set up

libraries and data sets

LIWC set up

data set up

wide merged data

I. descriptives + visualizations

- means & SDs

##                      M    SD Min Max
## age              48.59 15.55   0  89
## education        14.33  2.83   1  17
## SESladder         5.67  1.92   1  10
## vaxxAttitudes_w1  0.61  2.15  -3   3
## vaxxAttitudes_w2  0.38  2.10  -3   3
## vaxxBehavior      3.23  1.17   1   4

- white vs. other

## 
## other white 
##  1050  2186

## 
## other white 
## 0.324 0.676

describeBy(x[1:4], x[6])

## 
##  Descriptive statistics by group 
## race_factor_w: other
##                  vars    n mean   sd median trimmed  mad min max range  skew
## vaxxAttitudes_w1    1 1050 0.57 2.06    1.0    0.71 2.97  -3   3     6 -0.43
## vaxxAttitudes_w2    2  739 0.28 2.03    0.0    0.35 2.97  -3   3     6 -0.24
## vaxxBehavior        3  281 3.44 1.03    4.0    3.67 0.00   1   4     3 -1.68
## SESladder           4 1050 5.72 1.96    5.5    5.69 2.22   1  10     9  0.11
##                  kurtosis   se
## vaxxAttitudes_w1    -1.00 0.06
## vaxxAttitudes_w2    -1.02 0.07
## vaxxBehavior         1.26 0.06
## SESladder           -0.22 0.06
## ------------------------------------------------------------ 
## race_factor_w: white
##                  vars    n mean   sd median trimmed  mad min max range  skew
## vaxxAttitudes_w1    1 2186 0.65 2.18      1    0.82 2.97  -3   3     6 -0.50
## vaxxAttitudes_w2    2 1684 0.45 2.12      0    0.56 2.97  -3   3     6 -0.36
## vaxxBehavior        3  738 3.16 1.21      4    3.33 0.00   1   4     3 -1.06
## SESladder           4 2183 5.62 1.90      5    5.57 1.48   1  10     9  0.26
##                  kurtosis   se
## vaxxAttitudes_w1    -1.13 0.05
## vaxxAttitudes_w2    -1.11 0.05
## vaxxBehavior        -0.60 0.04
## SESladder           -0.38 0.04

- black vs. other

## 
## black other 
##   440  2796

## 
## black other 
## 0.136 0.864

describeBy(x[1:4], x[7])

## 
##  Descriptive statistics by group 
## race_factor_b: black
##                  vars   n  mean   sd median trimmed  mad min max range  skew
## vaxxAttitudes_w1    1 440  0.00 2.15      0    0.00 2.97  -3   3     6 -0.10
## vaxxAttitudes_w2    2 299 -0.26 2.06      0   -0.32 2.97  -3   3     6  0.09
## vaxxBehavior        3 112  3.27 1.16      4    3.46 0.00   1   4     3 -1.24
## SESladder           4 440  5.88 2.01      6    5.88 1.48   1  10     9  0.00
##                  kurtosis   se
## vaxxAttitudes_w1    -1.29 0.10
## vaxxAttitudes_w2    -1.09 0.12
## vaxxBehavior        -0.17 0.11
## SESladder           -0.20 0.10
## ------------------------------------------------------------ 
## race_factor_b: other
##                  vars    n mean   sd median trimmed  mad min max range  skew
## vaxxAttitudes_w1    1 2796 0.73 2.13      1    0.91 2.97  -3   3     6 -0.55
## vaxxAttitudes_w2    2 2124 0.49 2.08      0    0.61 2.97  -3   3     6 -0.39
## vaxxBehavior        3  907 3.23 1.17      4    3.42 0.00   1   4     3 -1.20
## SESladder           4 2793 5.62 1.90      5    5.57 1.48   1  10     9  0.24
##                  kurtosis   se
## vaxxAttitudes_w1    -1.02 0.04
## vaxxAttitudes_w2    -1.04 0.05
## vaxxBehavior        -0.25 0.04
## SESladder           -0.34 0.04

- rural vs. other

## 
## other rural 
##  2603   678

## 
## other rural 
## 0.793 0.207

describeBy(x[1:4], x[5])

## 
##  Descriptive statistics by group 
## area_factor: other
##                  vars    n mean   sd median trimmed  mad min max range  skew
## vaxxAttitudes_w1    1 2603 0.71 2.11      1    0.88 2.97  -3   3     6 -0.53
## vaxxAttitudes_w2    2 1946 0.46 2.08      0    0.57 2.97  -3   3     6 -0.36
## vaxxBehavior        3  803 3.32 1.11      4    3.52 0.00   1   4     3 -1.38
## SESladder           4 2600 5.60 1.92      5    5.55 1.48   1  10     9  0.21
##                  kurtosis   se
## vaxxAttitudes_w1    -1.01 0.04
## vaxxAttitudes_w2    -1.05 0.05
## vaxxBehavior         0.27 0.04
## SESladder           -0.31 0.04
## ------------------------------------------------------------ 
## area_factor: rural
##                  vars   n mean   sd median trimmed  mad min max range  skew
## vaxxAttitudes_w1    1 678 0.26 2.26      0    0.32 2.97  -3   3     6 -0.23
## vaxxAttitudes_w2    2 506 0.09 2.16      0    0.12 2.97  -3   3     6 -0.16
## vaxxBehavior        3 225 2.91 1.32      4    3.01 0.00   1   4     3 -0.63
## SESladder           4 678 5.93 1.89      6    5.88 1.48   1  10     9  0.23
##                  kurtosis   se
## vaxxAttitudes_w1    -1.38 0.09
## vaxxAttitudes_w2    -1.25 0.10
## vaxxBehavior        -1.41 0.09
## SESladder           -0.43 0.07

- w1 LIWC ratings for media

##    mediaOutlet analytic affect threat
## 1          ABC   -0.156  0.061  0.876
## 2          AOL    1.291 -0.332  1.445
## 3          CBS   -0.187  0.033  0.428
## 4          CNN   -0.644 -0.053 -0.866
## 5          Fox   -1.813  0.506 -1.122
## 6        MSNBC   -0.918  0.023 -0.767
## 7          NBC   -0.029  2.590 -1.748
## 8          NPR   -0.802 -0.408 -0.575
## 9          NYT    1.120 -0.301  1.149
## 10         PBS   -0.178 -0.024  0.342
## 11    USAToday    0.923 -0.192  0.726
## 12         WSJ    1.395 -1.903  0.112

- w2 LIWC ratings for media

##    mediaOutlet analytic affect threat
## 1          ABC   -0.317  0.093  0.876
## 2          AOL    1.260 -0.075  1.445
## 3          CBS    0.342 -0.018  0.428
## 4          CNN   -1.236 -0.102 -0.866
## 5          Fox   -1.531  0.362 -1.122
## 6        MSNBC   -0.841 -0.120 -0.767
## 7          NBC   -0.142  2.448 -1.748
## 8          NPR   -0.738 -0.186 -0.575
## 9          NYT    1.101 -0.173  1.149
## 10         PBS   -0.229 -0.100  0.342
## 11    USAToday    0.978  0.053  0.726
## 12         WSJ    1.352 -2.182  0.112

- analytic

w1

w2

- affect

w1

w2

- threat

w1

w2

correlations

- LIWC ratings

x1 <- cbind.data.frame(w1$affect, 
                       w1$analytic, 
                       w1$threat,
                       w2$affect,
                       w2$analytic,
                       w2$threat)

cor1 <- cor(x1, use = "complete.obs")

ggcorrplot(cor1, type = "lower",
   lab = TRUE, title = "", show.legend = F)

- vaxx attitudes/behavior

- media index scores

- media index difference scores

II. Analyses

A. Analytic

i. Wave 1 (excluding partyID)

a1. vaxxAttitudes ~ ANALYTIC + ruralVother

m1.cc <- lm(vaxxAttitudes_w1 ~ ruralVother + index_ANexp_w1, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother + index_ANexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9228 -1.6152  0.2759  2.2069  2.9996 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.52431    0.05083  10.316  < 2e-16 ***
## ruralVother     0.44555    0.09244   4.820  1.5e-06 ***
## index_ANexp_w1  0.26017    0.12799   2.033   0.0422 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.143 on 3278 degrees of freedom
## Multiple R-squared:  0.008494,   Adjusted R-squared:  0.007889 
## F-statistic: 14.04 on 2 and 3278 DF,  p-value: 8.48e-07

a2. vaxxAttitudes ~ ANALYTIC * ruralVother

m2.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_ANexp_w1, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_ANexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9149 -1.6186  0.2765  2.2100  3.0386 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.52713    0.05410   9.744  < 2e-16 ***
## ruralVother                 0.43698    0.10820   4.039  5.5e-05 ***
## index_ANexp_w1              0.27533    0.16207   1.699   0.0894 .  
## ruralVother:index_ANexp_w1 -0.04943    0.32414  -0.153   0.8788    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.143 on 3277 degrees of freedom
## Multiple R-squared:  0.008501,   Adjusted R-squared:  0.007593 
## F-statistic: 9.365 on 3 and 3277 DF,  p-value: 3.668e-06

b1. vaxxAttitudes ~ ANALYTIC + whiteVother

m11.cc <- lm(vaxxAttitudes_w1 ~ whiteVother + index_ANexp_w1, data = dw)
summary(m11.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother + index_ANexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8799 -1.5697  0.3564  2.2620  2.7905 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.63835    0.04460  14.311   <2e-16 ***
## whiteVother    -0.12284    0.07958  -1.544    0.123    
## index_ANexp_w1  0.28394    0.12832   2.213    0.027 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.149 on 3278 degrees of freedom
## Multiple R-squared:  0.002192,   Adjusted R-squared:  0.001583 
## F-statistic: 3.601 on 2 and 3278 DF,  p-value: 0.02741

b2. vaxxAttitudes ~ ANALYTIC * whiteVother

m22.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_ANexp_w1, data = dw)
summary(m22.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_ANexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8643 -1.5885  0.3478  2.2761  2.9221 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.64213    0.04497  14.280   <2e-16 ***
## whiteVother                -0.09498    0.08994  -1.056   0.2910    
## index_ANexp_w1              0.31002    0.13419   2.310   0.0209 *  
## whiteVother:index_ANexp_w1  0.17853    0.26837   0.665   0.5059    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.15 on 3277 degrees of freedom
## Multiple R-squared:  0.002327,   Adjusted R-squared:  0.001414 
## F-statistic: 2.548 on 3 and 3277 DF,  p-value: 0.05419

c1. vaxxAttitudes ~ ANALYTIC + blackVother

m1.cc <- lm(vaxxAttitudes_w1 ~ blackVother + index_ANexp_w1, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother + index_ANexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8818 -1.6843  0.2755  2.2165  3.2363 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.39561    0.05949   6.650 3.43e-11 ***
## blackVother     0.69200    0.10981   6.302 3.34e-10 ***
## index_ANexp_w1  0.22093    0.12795   1.727   0.0843 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.137 on 3278 degrees of freedom
## Multiple R-squared:  0.01342,    Adjusted R-squared:  0.01282 
## F-statistic: 22.29 on 2 and 3278 DF,  p-value: 2.418e-10

c2. vaxxAttitudes ~ ANALYTIC * blackVother

m2.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_ANexp_w1, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_ANexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8941 -1.6826  0.2744  2.2112  3.1452 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.38774    0.06559   5.911 3.74e-09 ***
## blackVother                 0.71244    0.13119   5.431 6.02e-08 ***
## index_ANexp_w1              0.18660    0.17578   1.062    0.289    
## blackVother:index_ANexp_w1  0.10015    0.35156   0.285    0.776    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.138 on 3277 degrees of freedom
## Multiple R-squared:  0.01344,    Adjusted R-squared:  0.01254 
## F-statistic: 14.88 on 3 and 3277 DF,  p-value: 1.266e-09

d1. vaxxAttitudes ~ ANALYTIC + education.c

m1.cc <- lm(vaxxAttitudes_w1 ~ edu.c + index_ANexp_w1, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c + index_ANexp_w1, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0376 -1.4974  0.2672  2.1165  3.6030 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.65340    0.04240  15.412  < 2e-16 ***
## edu.c           0.08902    0.01318   6.753  1.7e-11 ***
## index_ANexp_w1  0.24999    0.12756   1.960   0.0501 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.135 on 3278 degrees of freedom
## Multiple R-squared:  0.01517,    Adjusted R-squared:  0.01457 
## F-statistic: 25.25 on 2 and 3278 DF,  p-value: 1.317e-11

d2. vaxxAttitudes ~ ANALYTIC * education.c

m2.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_ANexp_w1, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_ANexp_w1, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0082 -1.5042  0.2612  2.1220  3.6997 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           0.65368    0.04241  15.414  < 2e-16 ***
## edu.c                 0.08718    0.01423   6.125 1.01e-09 ***
## index_ANexp_w1        0.24878    0.12763   1.949   0.0513 .  
## edu.c:index_ANexp_w1 -0.01537    0.04476  -0.343   0.7314    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.136 on 3277 degrees of freedom
## Multiple R-squared:  0.0152, Adjusted R-squared:  0.0143 
## F-statistic: 16.87 on 3 and 3277 DF,  p-value: 7.183e-11

ii. Wave 2 (excluding partyID)

a1. vaxxAttitudes ~ ANALYTIC + ruralVother

m1.cc <- lm(vaxxAttitudes_w2 ~ ruralVother + index_ANexp_w2, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother + index_ANexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.5061 -1.4543 -0.0968  1.8951  2.9692 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.28177    0.05738   4.911 9.67e-07 ***
## ruralVother     0.36990    0.10450   3.540 0.000408 ***
## index_ANexp_w2  0.06546    0.15369   0.426 0.670182    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 2442 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.005157,   Adjusted R-squared:  0.004343 
## F-statistic:  6.33 on 2 and 2442 DF,  p-value: 0.001812

a2. vaxxAttitudes ~ ANALYTIC * ruralVother

m2.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_ANexp_w2, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_ANexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.5753 -1.4518 -0.0982  1.8006  3.0851 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.26286    0.05961   4.409 1.08e-05 ***
## ruralVother                 0.43692    0.11923   3.665 0.000253 ***
## index_ANexp_w2             -0.06622    0.19065  -0.347 0.728392    
## ruralVother:index_ANexp_w2  0.44499    0.38131   1.167 0.243320    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.005712,   Adjusted R-squared:  0.00449 
## F-statistic: 4.674 on 3 and 2441 DF,  p-value: 0.002924

b1. vaxxAttitudes ~ ANALYTIC + whiteVother

m1.cc <- lm(vaxxAttitudes_w2 ~ whiteVother + index_ANexp_w2, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother + index_ANexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.4979 -1.4331 -0.2287  1.7577  2.8158 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.34875    0.05177   6.737 2.01e-11 ***
## whiteVother    -0.21291    0.09132  -2.332   0.0198 *  
## index_ANexp_w2  0.05403    0.15389   0.351   0.7256    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.094 on 2442 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.002274,   Adjusted R-squared:  0.001456 
## F-statistic: 2.782 on 2 and 2442 DF,  p-value: 0.06209

b2. vaxxAttitudes ~ ANALYTIC * whiteVother

m2.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_ANexp_w2, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_ANexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.7711 -1.3962 -0.1661  1.6960  3.4132 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.37126    0.05214   7.120 1.41e-12 ***
## whiteVother                -0.04988    0.10428  -0.478  0.63249    
## index_ANexp_w2              0.19290    0.15954   1.209  0.22674    
## whiteVother:index_ANexp_w2  1.02667    0.31908   3.218  0.00131 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.09 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.006487,   Adjusted R-squared:  0.005266 
## F-statistic: 5.313 on 3 and 2441 DF,  p-value: 0.001194

c1. vaxxAttitudes ~ ANALYTIC + blackVother

m1.cc <- lm(vaxxAttitudes_w2 ~ blackVother + index_ANexp_w2, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother + index_ANexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.4814 -1.4654  0.2489  1.5384  3.2671 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.10299    0.07045   1.462    0.144    
## blackVother     0.72491    0.12942   5.601 2.37e-08 ***
## index_ANexp_w2 -0.01628    0.15361  -0.106    0.916    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.083 on 2442 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.01274,    Adjusted R-squared:  0.01193 
## F-statistic: 15.75 on 2 and 2442 DF,  p-value: 1.597e-07

c2. vaxxAttitudes ~ ANALYTIC * blackVother

m2.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_ANexp_w2, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_ANexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.5858 -1.4466  0.0895  1.5870  3.7705 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.16140    0.07741   2.085 0.037188 *  
## blackVother                 0.57039    0.15483   3.684 0.000235 ***
## index_ANexp_w2              0.22957    0.20468   1.122 0.262144    
## blackVother:index_ANexp_w2 -0.74353    0.40936  -1.816 0.069443 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.082 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.01407,    Adjusted R-squared:  0.01286 
## F-statistic: 11.61 on 3 and 2441 DF,  p-value: 1.486e-07

d1. vaxxAttitudes ~ ANALYTIC + education.c

m1.cc <- lm(vaxxAttitudes_w1 ~ edu.c + index_ANexp_w2, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c + index_ANexp_w2, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0981 -1.4073  0.3064  2.0767  3.6862 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.63901    0.04984  12.820  < 2e-16 ***
## edu.c           0.09986    0.01666   5.994 2.36e-09 ***
## index_ANexp_w2 -0.20878    0.15666  -1.333    0.183    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.133 on 2444 degrees of freedom
##   (834 observations deleted due to missingness)
## Multiple R-squared:  0.01522,    Adjusted R-squared:  0.01442 
## F-statistic: 18.89 on 2 and 2444 DF,  p-value: 7.234e-09

d2. vaxxAttitudes ~ ANALYTIC * education.c

m2.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_ANexp_w2, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_ANexp_w2, data = dw)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
## -4.106 -1.408  0.307  2.077  3.639 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           0.63905    0.04986  12.817  < 2e-16 ***
## edu.c                 0.09939    0.01797   5.532 3.51e-08 ***
## index_ANexp_w2       -0.20824    0.15688  -1.327    0.185    
## edu.c:index_ANexp_w2 -0.00390    0.05580  -0.070    0.944    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.133 on 2443 degrees of freedom
##   (834 observations deleted due to missingness)
## Multiple R-squared:  0.01522,    Adjusted R-squared:  0.01401 
## F-statistic: 12.59 on 3 and 2443 DF,  p-value: 3.631e-08

iii. Wave 3 (excluding partyID)

a1. vaxxBehavior ~ ANALYTIC + ruralVother

m1.cc <- lm(vaxxBehavior ~ ruralVother + index_ANexp_w3, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother + index_ANexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.4164 -0.3268  0.6434  0.6954  1.2133 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.10180    0.04854  63.897  < 2e-16 ***
## ruralVother     0.40568    0.08859   4.579 5.25e-06 ***
## index_ANexp_w3 -0.20338    0.15732  -1.293    0.196    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.158 on 996 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.02182,    Adjusted R-squared:  0.01986 
## F-statistic: 11.11 on 2 and 996 DF,  p-value: 1.692e-05

a2. vaxxBehavior ~ ANALYTIC * ruralVother

m2.cc <- lm(vaxxBehavior ~ ruralVother * index_ANexp_w3, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_ANexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3551 -0.3279  0.6630  0.6790  1.5918 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.07221    0.05128  59.907  < 2e-16 ***
## ruralVother                 0.49761    0.10257   4.852 1.42e-06 ***
## index_ANexp_w3             -0.40727    0.19474  -2.091   0.0367 *  
## ruralVother:index_ANexp_w3  0.69048    0.38947   1.773   0.0766 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.156 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.0249, Adjusted R-squared:  0.02196 
## F-statistic:  8.47 on 3 and 995 DF,  p-value: 1.469e-05

b1. vaxxBehavior ~ ANALYTIC + whiteVother

m1.cc <- lm(vaxxBehavior ~ whiteVother + index_ANexp_w3, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother + index_ANexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.4728 -0.2270  0.6130  0.8227  1.0075 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.26908    0.04499  72.660  < 2e-16 ***
## whiteVother     0.23577    0.08190   2.879  0.00408 ** 
## index_ANexp_w3 -0.18646    0.15824  -1.178  0.23892    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.165 on 996 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.009467,   Adjusted R-squared:  0.007478 
## F-statistic: 4.759 on 2 and 996 DF,  p-value: 0.008766

b2. vaxxBehavior ~ ANALYTIC * whiteVother

m2.cc <- lm(vaxxBehavior ~ whiteVother * index_ANexp_w3, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_ANexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.5023 -0.2168  0.6225  0.8232  0.9725 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.26658    0.04558  71.667   <2e-16 ***
## whiteVother                 0.22187    0.09116   2.434   0.0151 *  
## index_ANexp_w3             -0.21078    0.17306  -1.218   0.2235    
## whiteVother:index_ANexp_w3 -0.12037    0.34612  -0.348   0.7281    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.165 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.009587,   Adjusted R-squared:  0.006601 
## F-statistic:  3.21 on 3 and 995 DF,  p-value: 0.02239

c1. vaxxBehavior ~ ANALYTIC + blackVother

m1.cc <- lm(vaxxBehavior ~ blackVother + index_ANexp_w3, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother + index_ANexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3158 -0.2551  0.7222  0.7783  0.9370 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.24117    0.06271  51.686   <2e-16 ***
## blackVother    -0.05645    0.11966  -0.472    0.637    
## index_ANexp_w3 -0.17618    0.15883  -1.109    0.268    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.17 on 996 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.001449,   Adjusted R-squared:  -0.0005566 
## F-statistic: 0.7224 on 2 and 996 DF,  p-value: 0.4858

c2. vaxxBehavior ~ ANALYTIC * blackVother

m2.cc <- lm(vaxxBehavior ~ blackVother * index_ANexp_w3, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_ANexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3660 -0.2445  0.7369  0.7752  1.0609 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.22520    0.06519  49.470   <2e-16 ***
## blackVother                -0.01003    0.13039  -0.077    0.939    
## index_ANexp_w3             -0.31607    0.22267  -1.419    0.156    
## blackVother:index_ANexp_w3  0.39924    0.44535   0.896    0.370    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.17 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.002254,   Adjusted R-squared:  -0.0007539 
## F-statistic: 0.7494 on 3 and 995 DF,  p-value: 0.5228

d1. vaxxBehavior ~ ANALYTIC + education.c

m1.cc <- lm(vaxxBehavior ~ edu.c + index_ANexp_w3, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c + index_ANexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.4422 -0.3137  0.6392  0.7408  1.5539 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.19951    0.04162  76.870  < 2e-16 ***
## edu.c           0.05652    0.01405   4.024 6.16e-05 ***
## index_ANexp_w3 -0.17966    0.15757  -1.140    0.255    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.16 on 996 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.0172, Adjusted R-squared:  0.01523 
## F-statistic: 8.717 on 2 and 996 DF,  p-value: 0.0001766

d2. vaxxBehavior ~ ANALYTIC * education.c

m2.cc <- lm(vaxxBehavior ~ edu.c * index_ANexp_w3, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_ANexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.4318 -0.3137  0.6389  0.7388  1.5719 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           3.19893    0.04177  76.586  < 2e-16 ***
## edu.c                 0.05783    0.01587   3.645 0.000281 ***
## index_ANexp_w3       -0.18429    0.15978  -1.153 0.249041    
## edu.c:index_ANexp_w3  0.01148    0.06448   0.178 0.858711    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.161 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.01723,    Adjusted R-squared:  0.01427 
## F-statistic: 5.816 on 3 and 995 DF,  p-value: 0.0006112

i. Wave 1

a1. vaxxAttitudes ~ ANALYTIC + ruralVother + partyID

m1.cc <- lm(vaxxAttitudes_w1 ~ ruralVother + index_ANexp_w1 + DvR + IvDR, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother + index_ANexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.3414 -1.2726  0.0812  1.7796  3.1685 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.43425    0.05079   8.550  < 2e-16 ***
## ruralVother     0.30239    0.09090   3.327 0.000888 ***
## index_ANexp_w1  0.16110    0.12607   1.278 0.201379    
## DvR            -0.96681    0.08288 -11.665  < 2e-16 ***
## IvDR            0.51622    0.09336   5.530 3.46e-08 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.09 on 3266 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.05863,    Adjusted R-squared:  0.05748 
## F-statistic: 50.85 on 4 and 3266 DF,  p-value: < 2.2e-16

a2. vaxxAttitudes ~ ANALYTIC * ruralVother + partyID

m2.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_ANexp_w1 + DvR + IvDR, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_ANexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.3218 -1.2685  0.0865  1.7798  3.2402 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.44158    0.05381   8.206 3.24e-16 ***
## ruralVother                 0.27968    0.10628   2.632  0.00854 ** 
## index_ANexp_w1              0.20113    0.15909   1.264  0.20623    
## DvR                        -0.96711    0.08289 -11.667  < 2e-16 ***
## IvDR                        0.51712    0.09339   5.537 3.32e-08 ***
## ruralVother:index_ANexp_w1 -0.13055    0.31641  -0.413  0.67993    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.05868,    Adjusted R-squared:  0.05724 
## F-statistic: 40.71 on 5 and 3265 DF,  p-value: < 2.2e-16

b1. vaxxAttitudes ~ ANALYTIC + whiteVother + partyID

m11.cc <- lm(vaxxAttitudes_w1 ~ whiteVother + index_ANexp_w1 + DvR + IvDR, data = dw)
summary(m11.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother + index_ANexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.4738 -1.3787  0.1302  1.7181  3.3284 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.45040    0.04564   9.868  < 2e-16 ***
## whiteVother    -0.40375    0.08095  -4.988 6.43e-07 ***
## index_ANexp_w1  0.15459    0.12581   1.229    0.219    
## DvR            -1.12242    0.08575 -13.089  < 2e-16 ***
## IvDR            0.49178    0.09335   5.268 1.47e-07 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.086 on 3266 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06258,    Adjusted R-squared:  0.06143 
## F-statistic: 54.51 on 4 and 3266 DF,  p-value: < 2.2e-16

b2. vaxxAttitudes ~ ANALYTIC * whiteVother + partyID

m22.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_ANexp_w1 + DvR + IvDR, data = dw)
summary(m22.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_ANexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.3672 -1.3590  0.1725  1.6976  3.6362 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.45922    0.04590  10.005  < 2e-16 ***
## whiteVother                -0.33452    0.08981  -3.725 0.000199 ***
## index_ANexp_w1              0.22048    0.13112   1.682 0.092760 .  
## DvR                        -1.13563    0.08605 -13.198  < 2e-16 ***
## IvDR                        0.48888    0.09333   5.238 1.73e-07 ***
## whiteVother:index_ANexp_w1  0.46522    0.26171   1.778 0.075565 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.085 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06349,    Adjusted R-squared:  0.06205 
## F-statistic: 44.27 on 5 and 3265 DF,  p-value: < 2.2e-16

c1. vaxxAttitudes ~ ANALYTIC + blackVother + partyID

m1.cc <- lm(vaxxAttitudes_w1 ~ blackVother + index_ANexp_w1 + DvR + IvDR, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother + index_ANexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.4673 -1.4505  0.5434  1.5629  4.0171 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.04879    0.06136   0.795    0.427    
## blackVother     1.18960    0.11069  10.747   <2e-16 ***
## index_ANexp_w1  0.02771    0.12479   0.222    0.824    
## DvR            -1.25439    0.08442 -14.859   <2e-16 ***
## IvDR            0.54220    0.09190   5.900    4e-09 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.058 on 3266 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.08771,    Adjusted R-squared:  0.08659 
## F-statistic:  78.5 on 4 and 3266 DF,  p-value: < 2.2e-16

c2. vaxxAttitudes ~ ANALYTIC * blackVother + partyID

m2.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_ANexp_w1 + DvR + IvDR, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_ANexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.4563 -1.4491  0.5495  1.5567  4.1435 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.06681    0.06651   1.005    0.315    
## blackVother                 1.14236    0.12951   8.821  < 2e-16 ***
## index_ANexp_w1              0.10859    0.16977   0.640    0.522    
## DvR                        -1.25896    0.08468 -14.867  < 2e-16 ***
## IvDR                        0.54086    0.09192   5.884 4.41e-09 ***
## blackVother:index_ANexp_w1 -0.23887    0.33993  -0.703    0.482    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.058 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.08784,    Adjusted R-squared:  0.08645 
## F-statistic: 62.89 on 5 and 3265 DF,  p-value: < 2.2e-16

d1. vaxxAttitudes ~ ANALYTIC + education.c + partyID

m1.cc <- lm(vaxxAttitudes_w1 ~ edu.c + index_ANexp_w1 + DvR + IvDR, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c + index_ANexp_w1 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.4294 -1.3700  0.0813  1.7050  3.9487 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.52213    0.04322  12.080  < 2e-16 ***
## edu.c           0.08414    0.01288   6.532 7.52e-11 ***
## index_ANexp_w1  0.13667    0.12554   1.089    0.276    
## DvR            -0.99901    0.08191 -12.197  < 2e-16 ***
## IvDR            0.48308    0.09309   5.189 2.24e-07 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.08 on 3266 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06762,    Adjusted R-squared:  0.06648 
## F-statistic: 59.22 on 4 and 3266 DF,  p-value: < 2.2e-16

d2. vaxxAttitudes ~ ANALYTIC * education.c + partyID

m2.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_ANexp_w1 + DvR + IvDR, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_ANexp_w1 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.3998 -1.3736  0.1114  1.6980  3.9600 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           0.52241    0.04322  12.086  < 2e-16 ***
## edu.c                 0.07934    0.01392   5.701  1.3e-08 ***
## index_ANexp_w1        0.13334    0.12560   1.062    0.288    
## DvR                  -1.00148    0.08195 -12.220  < 2e-16 ***
## IvDR                  0.48524    0.09312   5.211  2.0e-07 ***
## edu.c:index_ANexp_w1 -0.03984    0.04365  -0.913    0.361    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.08 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06786,    Adjusted R-squared:  0.06643 
## F-statistic: 47.54 on 5 and 3265 DF,  p-value: < 2.2e-16

ii. Wave 2

a1. vaxxAttitudes ~ ANALYTIC + ruralVother + partyID

m1.cc <- lm(vaxxAttitudes_w2 ~ ruralVother + index_ANexp_w2 + DvR + IvDR, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother + index_ANexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8498 -1.2434  0.0378  1.9512  3.3737 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.22493    0.05849   3.846 0.000123 ***
## ruralVother     0.28844    0.10413   2.770 0.005648 ** 
## index_ANexp_w2  0.14925    0.15348   0.972 0.330924    
## DvR            -0.56715    0.09301  -6.098 1.25e-09 ***
## IvDR            0.47815    0.11198   4.270 2.03e-05 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.07 on 2433 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.02794,    Adjusted R-squared:  0.02634 
## F-statistic: 17.48 on 4 and 2433 DF,  p-value: 3.747e-14

a2. vaxxAttitudes ~ ANALYTIC * ruralVother + partyID

m2.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_ANexp_w2 + DvR + IvDR, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_ANexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
## -3.891 -1.261  0.041  1.940  3.331 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.20428    0.06080   3.360 0.000792 ***
## ruralVother                 0.35927    0.11872   3.026 0.002502 ** 
## index_ANexp_w2              0.01158    0.18932   0.061 0.951245    
## DvR                        -0.56478    0.09302  -6.072 1.46e-09 ***
## IvDR                        0.48413    0.11207   4.320 1.62e-05 ***
## ruralVother:index_ANexp_w2  0.46934    0.37796   1.242 0.214436    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.07 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.02855,    Adjusted R-squared:  0.02656 
## F-statistic:  14.3 on 5 and 2432 DF,  p-value: 8.075e-14

b1. vaxxAttitudes ~ ANALYTIC + whiteVother + partyID

m1.cc <- lm(vaxxAttitudes_w2 ~ whiteVother + index_ANexp_w2 + DvR + IvDR, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother + index_ANexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0353 -1.2236  0.0056  1.8647  3.3599 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.23491    0.05350   4.391 1.18e-05 ***
## whiteVother    -0.38041    0.09425  -4.036 5.60e-05 ***
## index_ANexp_w2  0.13682    0.15320   0.893    0.372    
## DvR            -0.70361    0.09613  -7.319 3.36e-13 ***
## IvDR            0.45550    0.11200   4.067 4.92e-05 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.066 on 2433 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03136,    Adjusted R-squared:  0.02977 
## F-statistic: 19.69 on 4 and 2433 DF,  p-value: 5.758e-16

b2. vaxxAttitudes ~ ANALYTIC * whiteVother + partyID

m2.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_ANexp_w2 + DvR + IvDR, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_ANexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1075 -1.2080 -0.0382  1.8852  3.7547 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.25911    0.05387   4.810 1.60e-06 ***
## whiteVother                -0.21577    0.10616  -2.033 0.042209 *  
## index_ANexp_w2              0.27881    0.15866   1.757 0.079002 .  
## DvR                        -0.71243    0.09596  -7.424 1.56e-13 ***
## IvDR                        0.44229    0.11184   3.955 7.88e-05 ***
## whiteVother:index_ANexp_w2  1.05575    0.31567   3.344 0.000837 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.062 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03579,    Adjusted R-squared:  0.03381 
## F-statistic: 18.06 on 5 and 2432 DF,  p-value: < 2.2e-16

c1. vaxxAttitudes ~ ANALYTIC + blackVother + partyID

m1.cc <- lm(vaxxAttitudes_w2 ~ blackVother + index_ANexp_w2 + DvR + IvDR, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother + index_ANexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0081 -1.1636  0.0218  1.9100  3.9658 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)    -0.11287    0.07316  -1.543    0.123    
## blackVother     1.04316    0.13283   7.853 6.04e-15 ***
## index_ANexp_w2  0.04639    0.15229   0.305    0.761    
## DvR            -0.79896    0.09506  -8.405  < 2e-16 ***
## IvDR            0.49474    0.11074   4.468 8.27e-06 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.048 on 2433 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.04898,    Adjusted R-squared:  0.04742 
## F-statistic: 31.33 on 4 and 2433 DF,  p-value: < 2.2e-16

c2. vaxxAttitudes ~ ANALYTIC * blackVother + partyID

m2.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_ANexp_w2 + DvR + IvDR, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_ANexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0397 -1.1490 -0.0425  1.8795  3.8617 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                -0.04960    0.07958  -0.623   0.5331    
## blackVother                 0.87660    0.15642   5.604 2.33e-08 ***
## index_ANexp_w2              0.31539    0.20251   1.557   0.1195    
## DvR                        -0.80351    0.09503  -8.455  < 2e-16 ***
## IvDR                        0.49110    0.11068   4.437 9.53e-06 ***
## blackVother:index_ANexp_w2 -0.81310    0.40384  -2.013   0.0442 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.046 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.05056,    Adjusted R-squared:  0.04861 
## F-statistic:  25.9 on 5 and 2432 DF,  p-value: < 2.2e-16

d1. vaxxAttitudes ~ ANALYTIC + education.c + partyID

m1.cc <- lm(vaxxAttitudes_w1 ~ edu.c + index_ANexp_w2 + DvR + IvDR, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c + index_ANexp_w2 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.5497 -1.4111  0.4787  1.6538  3.9332 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.55331    0.05070  10.913  < 2e-16 ***
## edu.c           0.09663    0.01622   5.956 2.96e-09 ***
## index_ANexp_w2 -0.12641    0.15365  -0.823 0.410746    
## DvR            -1.06520    0.09256 -11.508  < 2e-16 ***
## IvDR            0.39996    0.11203   3.570 0.000364 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.073 on 2435 degrees of freedom
##   (841 observations deleted due to missingness)
## Multiple R-squared:  0.07175,    Adjusted R-squared:  0.07022 
## F-statistic: 47.05 on 4 and 2435 DF,  p-value: < 2.2e-16

d2. vaxxAttitudes ~ ANALYTIC * education.c + partyID

m2.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_ANexp_w2 + DvR + IvDR, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_ANexp_w2 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.5440 -1.4114  0.4779  1.6546  3.9361 
## 
## Coefficients:
##                       Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           0.553268   0.050715  10.909  < 2e-16 ***
## edu.c                 0.097220   0.017498   5.556 3.06e-08 ***
## index_ANexp_w2       -0.127093   0.153867  -0.826 0.408891    
## DvR                  -1.065328   0.092592 -11.506  < 2e-16 ***
## IvDR                  0.399819   0.112066   3.568 0.000367 ***
## edu.c:index_ANexp_w2  0.004903   0.054275   0.090 0.928029    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.073 on 2434 degrees of freedom
##   (841 observations deleted due to missingness)
## Multiple R-squared:  0.07175,    Adjusted R-squared:  0.06984 
## F-statistic: 37.63 on 5 and 2434 DF,  p-value: < 2.2e-16

iii. Wave 3

a1. vaxxBehavior ~ ANALYTIC + ruralVother + partyID

m1.cc <- lm(vaxxBehavior ~ ruralVother + index_ANexp_w3 + DvR + IvDR, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother + index_ANexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7200 -0.5513  0.3598  0.8278  1.4218 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.07817    0.04841  63.586  < 2e-16 ***
## ruralVother     0.32672    0.08595   3.801 0.000153 ***
## index_ANexp_w3 -0.20455    0.15276  -1.339 0.180868    
## DvR            -0.68587    0.07817  -8.774  < 2e-16 ***
## IvDR            0.10641    0.09570   1.112 0.266450    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.116 on 991 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09384,    Adjusted R-squared:  0.09018 
## F-statistic: 25.66 on 4 and 991 DF,  p-value: < 2.2e-16

a2. vaxxBehavior ~ ANALYTIC * ruralVother + partyID

m2.cc <- lm(vaxxBehavior ~ ruralVother * index_ANexp_w3 + DvR + IvDR, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_ANexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6690 -0.6257  0.3576  0.8148  1.5662 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.04995    0.05098  59.826  < 2e-16 ***
## ruralVother                 0.41431    0.09940   4.168 3.34e-05 ***
## index_ANexp_w3             -0.39827    0.18857  -2.112   0.0349 *  
## DvR                        -0.68449    0.07809  -8.765  < 2e-16 ***
## IvDR                        0.10727    0.09560   1.122   0.2621    
## ruralVother:index_ANexp_w3  0.65693    0.37563   1.749   0.0806 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.115 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09663,    Adjusted R-squared:  0.09207 
## F-statistic: 21.18 on 5 and 990 DF,  p-value: < 2.2e-16

b1. vaxxBehavior ~ ANALYTIC + whiteVother + partyID

m1.cc <- lm(vaxxBehavior ~ whiteVother + index_ANexp_w3 + DvR + IvDR, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother + index_ANexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6830 -0.5457  0.3984  0.8806  1.3076 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.17997    0.04586  69.341   <2e-16 ***
## whiteVother     0.05394    0.08251   0.654    0.513    
## index_ANexp_w3 -0.18092    0.15371  -1.177    0.239    
## DvR            -0.69940    0.08126  -8.607   <2e-16 ***
## IvDR            0.13043    0.09667   1.349    0.178    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.124 on 991 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08103,    Adjusted R-squared:  0.07732 
## F-statistic: 21.84 on 4 and 991 DF,  p-value: < 2.2e-16

b2. vaxxBehavior ~ ANALYTIC * whiteVother + partyID

m2.cc <- lm(vaxxBehavior ~ whiteVother * index_ANexp_w3 + DvR + IvDR, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_ANexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6829 -0.5457  0.3983  0.8805  1.3078 
## 
## Coefficients:
##                              Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.1799784  0.0464699  68.431   <2e-16 ***
## whiteVother                 0.0539884  0.0905498   0.596    0.551    
## index_ANexp_w3             -0.1808252  0.1676205  -1.079    0.281    
## DvR                        -0.6994091  0.0814349  -8.589   <2e-16 ***
## IvDR                        0.1304184  0.0969149   1.346    0.179    
## whiteVother:index_ANexp_w3  0.0004698  0.3353870   0.001    0.999    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.125 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08103,    Adjusted R-squared:  0.07638 
## F-statistic: 17.46 on 5 and 990 DF,  p-value: < 2.2e-16

c1. vaxxBehavior ~ ANALYTIC + blackVother + partyID

m1.cc <- lm(vaxxBehavior ~ blackVother + index_ANexp_w3 + DvR + IvDR, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother + index_ANexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6936 -0.5144  0.3731  0.8819  1.4502 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.08750    0.06328  48.792   <2e-16 ***
## blackVother     0.20511    0.11876   1.727   0.0844 .  
## index_ANexp_w3 -0.17971    0.15351  -1.171   0.2420    
## DvR            -0.74636    0.08057  -9.263   <2e-16 ***
## IvDR            0.11964    0.09617   1.244   0.2138    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.123 on 991 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08339,    Adjusted R-squared:  0.07969 
## F-statistic: 22.54 on 4 and 991 DF,  p-value: < 2.2e-16

c2. vaxxBehavior ~ ANALYTIC * blackVother + partyID

m2.cc <- lm(vaxxBehavior ~ blackVother * index_ANexp_w3 + DvR + IvDR, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_ANexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6758 -0.5424  0.3738  0.8772  1.6212 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.07571    0.06551  46.952   <2e-16 ***
## blackVother                 0.23920    0.12841   1.863   0.0628 .  
## index_ANexp_w3             -0.28415    0.21430  -1.326   0.1852    
## DvR                        -0.74486    0.08062  -9.239   <2e-16 ***
## IvDR                        0.12098    0.09622   1.257   0.2089    
## blackVother:index_ANexp_w3  0.29891    0.42786   0.699   0.4850    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.123 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08384,    Adjusted R-squared:  0.07921 
## F-statistic: 18.12 on 5 and 990 DF,  p-value: < 2.2e-16

d1. vaxxBehavior ~ ANALYTIC + education.c + partyID

m1.cc <- lm(vaxxBehavior ~ edu.c + index_ANexp_w3 + DvR + IvDR, data = dw)
summary(m1.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c + index_ANexp_w3 + DvR + IvDR, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7361 -0.4415  0.3331  0.8296  1.9285 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.15063    0.04230  74.475  < 2e-16 ***
## edu.c           0.05688    0.01351   4.210 2.79e-05 ***
## index_ANexp_w3 -0.18655    0.15239  -1.224    0.221    
## DvR            -0.71600    0.07771  -9.214  < 2e-16 ***
## IvDR            0.11229    0.09547   1.176    0.240    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.114 on 991 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09678,    Adjusted R-squared:  0.09314 
## F-statistic: 26.55 on 4 and 991 DF,  p-value: < 2.2e-16

d2. vaxxBehavior ~ ANALYTIC * education.c + partyID

m2.cc <- lm(vaxxBehavior ~ edu.c * index_ANexp_w3 + DvR + IvDR, data = dw)
summary(m2.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_ANexp_w3 + DvR + IvDR, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7347 -0.4422  0.3323  0.8290  1.9385 
## 
## Coefficients:
##                       Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           3.150258   0.042481  74.157  < 2e-16 ***
## edu.c                 0.057617   0.015259   3.776 0.000169 ***
## index_ANexp_w3       -0.189064   0.154382  -1.225 0.220997    
## DvR                  -0.715865   0.077760  -9.206  < 2e-16 ***
## IvDR                  0.112691   0.095598   1.179 0.238761    
## edu.c:index_ANexp_w3  0.006421   0.062004   0.104 0.917541    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.115 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09679,    Adjusted R-squared:  0.09223 
## F-statistic: 21.22 on 5 and 990 DF,  p-value: < 2.2e-16

B. Affect

i. Wave 1 (excluding partyID)

a1. vaxxAttitudes_w1 ~ AFFECT + ruralVother

m3.cc <- lm(vaxxAttitudes_w1 ~ ruralVother + index_AFexp_w1, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother + index_AFexp_w1, 
##     data = dw)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
## -4.196 -1.527  0.312  2.048  3.232 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.38879    0.05051   7.698 1.82e-14 ***
## ruralVother     0.45655    0.09217   4.954 7.66e-07 ***
## index_AFexp_w1  0.54411    0.12172   4.470 8.08e-06 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.137 on 3278 degrees of freedom
## Multiple R-squared:  0.01326,    Adjusted R-squared:  0.01266 
## F-statistic: 22.02 on 2 and 3278 DF,  p-value: 3.155e-10

a2. vaxxAttitudes_w1 ~ AFFECT * ruralVother

m4.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_AFexp_w1, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_AFexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1507 -1.5561  0.3077  2.0715  3.4213 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.37450    0.05326   7.032 2.47e-12 ***
## ruralVother                 0.50174    0.10651   4.711 2.57e-06 ***
## index_AFexp_w1              0.62510    0.15481   4.038 5.52e-05 ***
## ruralVother:index_AFexp_w1 -0.26213    0.30963  -0.847    0.397    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.138 on 3277 degrees of freedom
## Multiple R-squared:  0.01347,    Adjusted R-squared:  0.01257 
## F-statistic: 14.92 on 3 and 3277 DF,  p-value: 1.203e-09

b1. vaxxAttitudes_w1 ~ AFFECT + whiteVother

m33.cc <- lm(vaxxAttitudes_w1 ~ whiteVother + index_AFexp_w1, data = dw)
summary(m33.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother + index_AFexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1172 -1.5129  0.3561  2.0957  2.8889 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.50068    0.04486  11.161  < 2e-16 ***
## whiteVother    -0.13243    0.07944  -1.667   0.0956 .  
## index_AFexp_w1  0.54427    0.12218   4.455 8.68e-06 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.145 on 3278 degrees of freedom
## Multiple R-squared:  0.006715,   Adjusted R-squared:  0.006109 
## F-statistic: 11.08 on 2 and 3278 DF,  p-value: 1.601e-05

b2. vaxxAttitudes_w1 ~ AFFECT * whiteVother

m44.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_AFexp_w1, data = dw)
summary(m44.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_AFexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.2426 -1.5186  0.3905  2.0905  2.9896 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.51321    0.04551  11.278  < 2e-16 ***
## whiteVother                -0.06011    0.09101  -0.660 0.508988    
## index_AFexp_w1              0.48395    0.12765   3.791 0.000153 ***
## whiteVother:index_AFexp_w1 -0.41539    0.25530  -1.627 0.103822    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.144 on 3277 degrees of freedom
## Multiple R-squared:  0.007517,   Adjusted R-squared:  0.006608 
## F-statistic: 8.273 on 3 and 3277 DF,  p-value: 1.76e-05

c1. vaxxAttitudes ~ AFFECT + blackVother

m3.cc <- lm(vaxxAttitudes_w1 ~ blackVother + index_AFexp_w1, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother + index_AFexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.2681 -1.5979  0.3192  2.0383  3.3072 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)      0.2184     0.0603   3.621 0.000297 ***
## blackVother      0.7828     0.1100   7.115 1.37e-12 ***
## index_AFexp_w1   0.6512     0.1223   5.325 1.08e-07 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.129 on 3278 degrees of freedom
## Multiple R-squared:  0.02099,    Adjusted R-squared:  0.02039 
## F-statistic: 35.14 on 2 and 3278 DF,  p-value: 7.934e-16

c2. vaxxAttitudes ~ AFFECT * blackVother

m3.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_AFexp_w1, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_AFexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.2531 -1.5965  0.3243  2.0450  3.3489 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.20789    0.06863   3.029  0.00247 ** 
## blackVother                 0.80905    0.13725   5.895 4.14e-09 ***
## index_AFexp_w1              0.68634    0.16431   4.177 3.03e-05 ***
## blackVother:index_AFexp_w1 -0.10534    0.32863  -0.321  0.74858    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.129 on 3277 degrees of freedom
## Multiple R-squared:  0.02102,    Adjusted R-squared:  0.02013 
## F-statistic: 23.46 on 3 and 3277 DF,  p-value: 5.116e-15

d1. vaxxAttitudes ~ AFFECT + education.c

m3.cc <- lm(vaxxAttitudes_w1 ~ edu.c + index_AFexp_w1, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c + index_AFexp_w1, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.3113 -1.4730  0.2927  2.0174  3.8604 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.51609    0.04237  12.181  < 2e-16 ***
## edu.c           0.09335    0.01315   7.097 1.55e-12 ***
## index_AFexp_w1  0.58368    0.12141   4.807 1.60e-06 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.129 on 3278 degrees of freedom
## Multiple R-squared:  0.02092,    Adjusted R-squared:  0.02032 
## F-statistic: 35.02 on 2 and 3278 DF,  p-value: 8.954e-16

d2. vaxxAttitudes ~ AFFECT * education.c

m3.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_AFexp_w1, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_AFexp_w1, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.3770 -1.4666  0.3089  1.9974  3.7250 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           0.51719    0.04240  12.196  < 2e-16 ***
## edu.c                 0.08983    0.01422   6.318 3.01e-10 ***
## index_AFexp_w1        0.58523    0.12145   4.819 1.51e-06 ***
## edu.c:index_AFexp_w1  0.02907    0.04462   0.652    0.515    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.129 on 3277 degrees of freedom
## Multiple R-squared:  0.02105,    Adjusted R-squared:  0.02015 
## F-statistic: 23.48 on 3 and 3277 DF,  p-value: 4.918e-15

ii. Wave 2 (excluding partyID)

a1. vaxxAttitudes_w2 ~ AFFECT + ruralVother

m3.cc <- lm(vaxxAttitudes_w2 ~ ruralVother + index_AFexp_w2, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother + index_AFexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.6512 -1.4222 -0.1027  1.8221  3.0557 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.24052    0.05602   4.294 1.83e-05 ***
## ruralVother     0.37135    0.10444   3.556 0.000384 ***
## index_AFexp_w2  0.23398    0.15243   1.535 0.124914    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.09 on 2442 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.006042,   Adjusted R-squared:  0.005228 
## F-statistic: 7.423 on 2 and 2442 DF,  p-value: 0.0006111

a2. vaxxAttitudes_w2 ~ AFFECT * ruralVother

m4.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_AFexp_w2, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_AFexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.5699 -1.4375 -0.1292  1.6673  3.2991 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.21926    0.05837   3.756 0.000176 ***
## ruralVother                 0.43888    0.11674   3.759 0.000174 ***
## index_AFexp_w2              0.38465    0.19179   2.006 0.045011 *  
## ruralVother:index_AFexp_w2 -0.49640    0.38358  -1.294 0.195740    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.09 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.006724,   Adjusted R-squared:  0.005503 
## F-statistic: 5.508 on 3 and 2441 DF,  p-value: 0.0009073

b1. vaxxAttitudes_w2 ~ AFFECT + whiteVother

m3.cc <- lm(vaxxAttitudes_w2 ~ whiteVother + index_AFexp_w2, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother + index_AFexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.6286 -1.4058 -0.1984  1.8030  2.9434 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.30708    0.05012   6.127 1.04e-09 ***
## whiteVother    -0.22010    0.09138  -2.409   0.0161 *  
## index_AFexp_w2  0.24411    0.15281   1.597   0.1103    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.093 on 2442 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.003265,   Adjusted R-squared:  0.002448 
## F-statistic: 3.999 on 2 and 2442 DF,  p-value: 0.01845

b2. vaxxAttitudes_w2 ~ AFFECT * whiteVother

m4.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_AFexp_w2, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_AFexp_w2, 
##     data = dw)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
## -3.712 -1.387 -0.228  1.772  2.869 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.31582    0.05089   6.206 6.35e-10 ***
## whiteVother                -0.17554    0.10177  -1.725   0.0847 .  
## index_AFexp_w2              0.19672    0.16007   1.229   0.2192    
## whiteVother:index_AFexp_w2 -0.31838    0.32013  -0.995   0.3201    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.093 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.003668,   Adjusted R-squared:  0.002444 
## F-statistic: 2.996 on 3 and 2441 DF,  p-value: 0.02965

c1. vaxxAttitudes_w2 ~ AFFECT + blackVother

m3.cc <- lm(vaxxAttitudes_w2 ~ blackVother + index_AFexp_w2, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother + index_AFexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.7107 -1.4293  0.1363  1.6367  3.4345 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.05212    0.06923   0.753   0.4516    
## blackVother     0.75436    0.12966   5.818 6.73e-09 ***
## index_AFexp_w2  0.32481    0.15271   2.127   0.0335 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.081 on 2442 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.01456,    Adjusted R-squared:  0.01375 
## F-statistic: 18.04 on 2 and 2442 DF,  p-value: 1.675e-08

c2. vaxxAttitudes_w2 ~ AFFECT * blackVother

m4.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_AFexp_w2, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_AFexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.7202 -1.4278  0.1616  1.6408  3.3967 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.05867    0.07708   0.761    0.447    
## blackVother                 0.73824    0.15416   4.789 1.78e-06 ***
## index_AFexp_w2              0.29686    0.21026   1.412    0.158    
## blackVother:index_AFexp_w2  0.08135    0.42052   0.193    0.847    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.082 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.01457,    Adjusted R-squared:  0.01336 
## F-statistic: 12.03 on 3 and 2441 DF,  p-value: 8.097e-08

d1. vaxxAttitudes_w2 ~ AFFECT + education.c

m3.cc <- lm(vaxxAttitudes_w2 ~ edu.c + index_AFexp_w2, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c + index_AFexp_w2, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.7496 -1.4398 -0.1695  1.7311  3.6000 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.33112    0.04687   7.065 2.09e-12 ***
## edu.c           0.06985    0.01641   4.258 2.14e-05 ***
## index_AFexp_w2  0.25890    0.15244   1.698   0.0896 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.088 on 2442 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.00826,    Adjusted R-squared:  0.007447 
## F-statistic: 10.17 on 2 and 2442 DF,  p-value: 3.999e-05

d2. vaxxAttitudes_w2 ~ AFFECT * education.c

m4.cc <- lm(vaxxAttitudes_w2 ~ edu.c * index_AFexp_w2, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c * index_AFexp_w2, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.5964 -1.4547 -0.1501  1.7401  3.7096 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           0.32612    0.04702   6.936 5.15e-12 ***
## edu.c                 0.07770    0.01747   4.448 9.04e-06 ***
## index_AFexp_w2        0.27957    0.15324   1.824   0.0682 .  
## edu.c:index_AFexp_w2 -0.07846    0.06001  -1.307   0.1912    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.088 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.008954,   Adjusted R-squared:  0.007736 
## F-statistic: 7.351 on 3 and 2441 DF,  p-value: 6.653e-05

iii. Wave 3 (excluding partyID)

a1. vaxxBehavior ~ AFFECT + ruralVother

m3.cc <- lm(vaxxBehavior ~ ruralVother + index_AFexp_w3, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother + index_AFexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6628 -0.3289  0.6212  0.7199  1.2631 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.08566    0.04710  65.517  < 2e-16 ***
## ruralVother     0.40422    0.08832   4.577 5.31e-06 ***
## index_AFexp_w3  0.39007    0.15252   2.557   0.0107 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.155 on 996 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.02657,    Adjusted R-squared:  0.02462 
## F-statistic: 13.59 on 2 and 996 DF,  p-value: 1.497e-06

a2. vaxxBehavior ~ AFFECT * ruralVother

m4.cc <- lm(vaxxBehavior ~ ruralVother * index_AFexp_w3, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_AFexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6509 -0.3308  0.6418  0.6951  1.6010 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.05660    0.04860  62.897  < 2e-16 ***
## ruralVother                 0.50042    0.09719   5.149 3.16e-07 ***
## index_AFexp_w3              0.64501    0.18701   3.449 0.000586 ***
## ruralVother:index_AFexp_w3 -0.87723    0.37403  -2.345 0.019204 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.152 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.03192,    Adjusted R-squared:  0.029 
## F-statistic: 10.94 on 3 and 995 DF,  p-value: 4.528e-07

b1. vaxxBehavior ~ AFFECT + whiteVother

m3.cc <- lm(vaxxBehavior ~ whiteVother + index_AFexp_w3, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother + index_AFexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6669 -0.2904  0.6318  0.8278  1.1051 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.25094    0.04389  74.074  < 2e-16 ***
## whiteVother     0.23455    0.08168   2.872  0.00417 ** 
## index_AFexp_w3  0.38328    0.15347   2.497  0.01267 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.162 on 996 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.01426,    Adjusted R-squared:  0.01228 
## F-statistic: 7.203 on 2 and 996 DF,  p-value: 0.0007834

b2. vaxxBehavior ~ AFFECT * whiteVother

m4.cc <- lm(vaxxBehavior ~ whiteVother * index_AFexp_w3, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_AFexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.5971 -0.3377  0.6042  0.8284  1.1859 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.25654    0.04423  73.634  < 2e-16 ***
## whiteVother                 0.26932    0.08845   3.045  0.00239 ** 
## index_AFexp_w3              0.32749    0.16285   2.011  0.04460 *  
## whiteVother:index_AFexp_w3 -0.33353    0.32570  -1.024  0.30606    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.162 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.0153, Adjusted R-squared:  0.01233 
## F-statistic: 5.152 on 3 and 995 DF,  p-value: 0.001544

c1. vaxxBehavior ~ AFFECT + blackVother

m3.cc <- lm(vaxxBehavior ~ blackVother + index_AFexp_w3, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother + index_AFexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.5602 -0.2575  0.6868  0.8028  1.0379 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.21245    0.06304  50.956   <2e-16 ***
## blackVother    -0.03050    0.11981  -0.255   0.7991    
## index_AFexp_w3  0.37757    0.15466   2.441   0.0148 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.167 on 996 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.006162,   Adjusted R-squared:  0.004166 
## F-statistic: 3.088 on 2 and 996 DF,  p-value: 0.04604

c2. vaxxBehavior ~ AFFECT * blackVother

m4.cc <- lm(vaxxBehavior ~ blackVother * index_AFexp_w3, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_AFexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.5755 -0.2566  0.6883  0.8013  1.0700 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.20608    0.06850  46.803   <2e-16 ***
## blackVother                -0.01467    0.13700  -0.107   0.9147    
## index_AFexp_w3              0.41323    0.21517   1.921   0.0551 .  
## blackVother:index_AFexp_w3 -0.10264    0.43034  -0.239   0.8115    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.167 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.006219,   Adjusted R-squared:  0.003222 
## F-statistic: 2.075 on 3 and 995 DF,  p-value: 0.1018

d1. vaxxBehavior ~ AFFECT + education.c

m3.cc <- lm(vaxxBehavior ~ edu.c + index_AFexp_w3, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c + index_AFexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6015 -0.3124  0.6314  0.7438  1.6589 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.17622    0.04038  78.654  < 2e-16 ***
## edu.c           0.05875    0.01403   4.188 3.06e-05 ***
## index_AFexp_w3  0.41977    0.15305   2.743   0.0062 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.157 on 996 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.0233, Adjusted R-squared:  0.02134 
## F-statistic: 11.88 on 2 and 996 DF,  p-value: 7.973e-06

d2. vaxxBehavior ~ AFFECT * education.c

m4.cc <- lm(vaxxBehavior ~ edu.c * index_AFexp_w3, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_AFexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6144 -0.3100  0.6304  0.7467  1.5873 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           3.17728    0.04064  78.175  < 2e-16 ***
## edu.c                 0.05736    0.01517   3.781 0.000166 ***
## index_AFexp_w3        0.41442    0.15472   2.679 0.007517 ** 
## edu.c:index_AFexp_w3  0.01407    0.05852   0.240 0.810004    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.157 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.02335,    Adjusted R-squared:  0.02041 
## F-statistic: 7.931 on 3 and 995 DF,  p-value: 3.139e-05

i. Wave 1

a1. vaxxAttitudes_w1 ~ AFFECT + ruralVother + partyID

m3.cc <- lm(vaxxAttitudes_w1 ~ ruralVother + index_AFexp_w1 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother + index_AFexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
## -4.534 -1.376  0.120  1.808  3.304 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.34757    0.05071   6.855 8.52e-12 ***
## ruralVother     0.31183    0.09079   3.435 0.000601 ***
## index_AFexp_w1  0.36836    0.11982   3.074 0.002127 ** 
## DvR            -0.95061    0.08279 -11.482  < 2e-16 ***
## IvDR            0.49588    0.09300   5.332 1.04e-07 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.088 on 3266 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06088,    Adjusted R-squared:  0.05973 
## F-statistic: 52.93 on 4 and 3266 DF,  p-value: < 2.2e-16

a2. vaxxAttitudes_w1 ~ AFFECT * ruralVother + partyID

m4.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_AFexp_w1 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_AFexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.4929 -1.3577  0.1539  1.7992  3.4342 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.33468    0.05326   6.284 3.75e-10 ***
## ruralVother                 0.35312    0.10474   3.371 0.000757 ***
## index_AFexp_w1              0.44222    0.15193   2.911 0.003632 ** 
## DvR                        -0.95068    0.08280 -11.482  < 2e-16 ***
## IvDR                        0.49484    0.09301   5.320 1.11e-07 ***
## ruralVother:index_AFexp_w1 -0.23921    0.30255  -0.791 0.429205    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.088 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06106,    Adjusted R-squared:  0.05962 
## F-statistic: 42.46 on 5 and 3265 DF,  p-value: < 2.2e-16

b1. vaxxAttitudes_w1 ~ AFFECT + whiteVother + partyID

m33.cc <- lm(vaxxAttitudes_w1 ~ whiteVother + index_AFexp_w1 + DvR + IvDR, data = dw)
summary(m33.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother + index_AFexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.6480 -1.4221  0.1737  1.7481  3.4501 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.36766    0.04544   8.091 8.27e-16 ***
## whiteVother    -0.40793    0.08083  -5.047 4.74e-07 ***
## index_AFexp_w1  0.36237    0.11954   3.031  0.00245 ** 
## DvR            -1.10848    0.08553 -12.960  < 2e-16 ***
## IvDR            0.47189    0.09299   5.075 4.09e-07 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.084 on 3266 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06478,    Adjusted R-squared:  0.06363 
## F-statistic: 56.56 on 4 and 3266 DF,  p-value: < 2.2e-16

b2. vaxxAttitudes_w1 ~ AFFECT * whiteVother + partyID

m44.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_AFexp_w1 + DvR + IvDR, data = dw)
summary(m44.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_AFexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.8234 -1.4826  0.0925  1.7758  3.2186 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.38410    0.04597   8.355  < 2e-16 ***
## whiteVother                -0.30945    0.09144  -3.384 0.000723 ***
## index_AFexp_w1              0.27774    0.12501   2.222 0.026364 *  
## DvR                        -1.11500    0.08552 -13.037  < 2e-16 ***
## IvDR                        0.47725    0.09295   5.134    3e-07 ***
## whiteVother:index_AFexp_w1 -0.57115    0.24856  -2.298 0.021634 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.082 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06629,    Adjusted R-squared:  0.06486 
## F-statistic: 46.36 on 5 and 3265 DF,  p-value: < 2.2e-16

c1. vaxxAttitudes ~ AFFECT + blackVother + partyID

m3.cc <- lm(vaxxAttitudes_w1 ~ blackVother + index_AFexp_w1 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother + index_AFexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
## -4.860 -1.484  0.358  1.656  4.122 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)    -0.05545    0.06115  -0.907    0.365    
## blackVother     1.24148    0.11038  11.248  < 2e-16 ***
## index_AFexp_w1  0.49934    0.11840   4.217 2.54e-05 ***
## DvR            -1.23083    0.08365 -14.713  < 2e-16 ***
## IvDR            0.52755    0.09141   5.771 8.62e-09 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.052 on 3266 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.09263,    Adjusted R-squared:  0.09152 
## F-statistic: 83.36 on 4 and 3266 DF,  p-value: < 2.2e-16

c2. vaxxAttitudes ~ AFFECT * blackVother + partyID

m3.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_AFexp_w1 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_AFexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.8571 -1.4840  0.3593  1.6563  4.1285 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                -0.05717    0.06876  -0.832  0.40572    
## blackVother                 1.24583    0.13588   9.169  < 2e-16 ***
## index_AFexp_w1              0.50517    0.15907   3.176  0.00151 ** 
## DvR                        -1.23077    0.08368 -14.709  < 2e-16 ***
## IvDR                        0.52746    0.09144   5.768 8.76e-09 ***
## blackVother:index_AFexp_w1 -0.01742    0.31732  -0.055  0.95622    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.053 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.09264,    Adjusted R-squared:  0.09125 
## F-statistic: 66.67 on 5 and 3265 DF,  p-value: < 2.2e-16

d1. vaxxAttitudes ~ AFFECT + education.c + partyID

m3.cc <- lm(vaxxAttitudes_w1 ~ edu.c + index_AFexp_w1 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c + index_AFexp_w1 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.6332 -1.3744  0.1229  1.7398  4.1274 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.43625    0.04312  10.117  < 2e-16 ***
## edu.c           0.08722    0.01287   6.776 1.46e-11 ***
## index_AFexp_w1  0.40463    0.11936   3.390 0.000707 ***
## DvR            -0.97936    0.08175 -11.981  < 2e-16 ***
## IvDR            0.46198    0.09269   4.984 6.55e-07 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.077 on 3266 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.07055,    Adjusted R-squared:  0.06941 
## F-statistic: 61.98 on 4 and 3266 DF,  p-value: < 2.2e-16

d2. vaxxAttitudes ~ AFFECT * education.c + partyID

m3.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_AFexp_w1 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_AFexp_w1 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.6795 -1.3765  0.1154  1.7464  4.0082 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           0.43732    0.04315  10.134  < 2e-16 ***
## edu.c                 0.08366    0.01391   6.013 2.02e-09 ***
## index_AFexp_w1        0.40619    0.11939   3.402 0.000677 ***
## DvR                  -0.97935    0.08175 -11.979  < 2e-16 ***
## IvDR                  0.46221    0.09270   4.986 6.48e-07 ***
## edu.c:index_AFexp_w1  0.02934    0.04354   0.674 0.500440    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.077 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.07068,    Adjusted R-squared:  0.06926 
## F-statistic: 49.67 on 5 and 3265 DF,  p-value: < 2.2e-16

ii. Wave 2

a1. vaxxAttitudes_w2 ~ AFFECT + ruralVother + partyID

m3.cc <- lm(vaxxAttitudes_w2 ~ ruralVother + index_AFexp_w2 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother + index_AFexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
## -3.883 -1.209  0.010  1.969  3.272 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.18786    0.05784   3.248  0.00118 ** 
## ruralVother     0.28905    0.10416   2.775  0.00556 ** 
## index_AFexp_w2  0.12304    0.15190   0.810  0.41801    
## DvR            -0.55966    0.09347  -5.988 2.44e-09 ***
## IvDR            0.46226    0.11117   4.158 3.32e-05 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.07 on 2433 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.02782,    Adjusted R-squared:  0.02622 
## F-statistic: 17.41 on 4 and 2433 DF,  p-value: 4.313e-14

a2. vaxxAttitudes_w2 ~ AFFECT * ruralVother + partyID

m4.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_AFexp_w2 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_AFexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8073 -1.2192 -0.0305  1.9588  3.3638 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.16590    0.06009   2.761  0.00581 ** 
## ruralVother                 0.35849    0.11625   3.084  0.00207 ** 
## index_AFexp_w2              0.27781    0.19059   1.458  0.14507    
## DvR                        -0.55986    0.09345  -5.991 2.40e-09 ***
## IvDR                        0.46304    0.11116   4.166 3.21e-05 ***
## ruralVother:index_AFexp_w2 -0.51069    0.37995  -1.344  0.17904    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.07 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.02854,    Adjusted R-squared:  0.02655 
## F-statistic: 14.29 on 5 and 2432 DF,  p-value: 8.172e-14

b1. vaxxAttitudes_w2 ~ AFFECT + whiteVother + partyID

m3.cc <- lm(vaxxAttitudes_w2 ~ whiteVother + index_AFexp_w2 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother + index_AFexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9943 -1.2131  0.0089  1.8668  3.3194 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.19876    0.05240   3.793 0.000152 ***
## whiteVother    -0.38316    0.09428  -4.064 4.97e-05 ***
## index_AFexp_w2  0.12731    0.15162   0.840 0.401179    
## DvR            -0.69673    0.09649  -7.221 6.87e-13 ***
## IvDR            0.44045    0.11118   3.962 7.66e-05 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.067 on 2433 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03132,    Adjusted R-squared:  0.02973 
## F-statistic: 19.67 on 4 and 2433 DF,  p-value: 6.024e-16

b2. vaxxAttitudes_w2 ~ AFFECT * whiteVother + partyID

m4.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_AFexp_w2 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_AFexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0950 -1.2282 -0.0141  1.9051  3.3317 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.20933    0.05313   3.940 8.37e-05 ***
## whiteVother                -0.33071    0.10385  -3.184  0.00147 ** 
## index_AFexp_w2              0.06983    0.15895   0.439  0.66046    
## DvR                        -0.70004    0.09652  -7.253 5.46e-13 ***
## IvDR                        0.43870    0.11118   3.946 8.18e-05 ***
## whiteVother:index_AFexp_w2 -0.38104    0.31663  -1.203  0.22893    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.066 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.0319, Adjusted R-squared:  0.02991 
## F-statistic: 16.03 on 5 and 2432 DF,  p-value: 1.433e-15

c1. vaxxAttitudes_w2 ~ AFFECT + blackVother + partyID

m3.cc <- lm(vaxxAttitudes_w2 ~ blackVother + index_AFexp_w2 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother + index_AFexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1214 -1.1426 -0.0153  1.9028  4.0110 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)    -0.15469    0.07222  -2.142   0.0323 *  
## blackVother     1.06329    0.13286   8.003 1.86e-15 ***
## index_AFexp_w2  0.21804    0.15071   1.447   0.1481    
## DvR            -0.78997    0.09523  -8.295  < 2e-16 ***
## IvDR            0.48666    0.10989   4.429 9.90e-06 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.047 on 2433 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.04976,    Adjusted R-squared:  0.0482 
## F-statistic: 31.85 on 4 and 2433 DF,  p-value: < 2.2e-16

c2. vaxxAttitudes_w2 ~ AFFECT * blackVother + partyID

m4.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_AFexp_w2 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_AFexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1239 -1.1423 -0.0133  1.9013  4.0073 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                -0.15293    0.07977  -1.917   0.0553 .  
## blackVother                 1.05892    0.15702   6.744 1.92e-11 ***
## index_AFexp_w2              0.21058    0.20772   1.014   0.3108    
## DvR                        -0.78981    0.09530  -8.288  < 2e-16 ***
## IvDR                        0.48675    0.10993   4.428 9.93e-06 ***
## blackVother:index_AFexp_w2  0.02170    0.41534   0.052   0.9583    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.047 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.04976,    Adjusted R-squared:  0.04781 
## F-statistic: 25.47 on 5 and 2432 DF,  p-value: < 2.2e-16

d1. vaxxAttitudes_w2 ~ AFFECT + education.c + partyID

m3.cc <- lm(vaxxAttitudes_w2 ~ edu.c + index_AFexp_w2 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c + index_AFexp_w2 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9893 -1.2311  0.0415  1.9022  3.7817 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.25473    0.04940   5.157 2.72e-07 ***
## edu.c           0.06729    0.01626   4.138 3.62e-05 ***
## index_AFexp_w2  0.14518    0.15177   0.957    0.339    
## DvR            -0.58215    0.09273  -6.278 4.05e-10 ***
## IvDR            0.45949    0.11095   4.141 3.57e-05 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.066 on 2433 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03156,    Adjusted R-squared:  0.02997 
## F-statistic: 19.82 on 4 and 2433 DF,  p-value: 4.491e-16

d2. vaxxAttitudes_w2 ~ AFFECT * education.c + partyID

m4.cc <- lm(vaxxAttitudes_w2 ~ edu.c * index_AFexp_w2 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c * index_AFexp_w2 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9069 -1.2361  0.0618  1.9093  3.8964 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           0.24970    0.04953   5.042 4.95e-07 ***
## edu.c                 0.07545    0.01731   4.358 1.37e-05 ***
## index_AFexp_w2        0.16640    0.15252   1.091    0.275    
## DvR                  -0.58321    0.09272  -6.290 3.75e-10 ***
## IvDR                  0.45836    0.11094   4.132 3.72e-05 ***
## edu.c:index_AFexp_w2 -0.08145    0.05941  -1.371    0.170    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.066 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03231,    Adjusted R-squared:  0.03032 
## F-statistic: 16.24 on 5 and 2432 DF,  p-value: 8.713e-16

iii. Wave 3

a1. vaxxBehavior ~ AFFECT + ruralVother + partyID

m3.cc <- lm(vaxxBehavior ~ ruralVother + index_AFexp_w3 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother + index_AFexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7566 -0.5880  0.3701  0.8293  1.4487 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.07731    0.04776  64.429  < 2e-16 ***
## ruralVother     0.32519    0.08588   3.787 0.000162 ***
## index_AFexp_w3  0.22992    0.14874   1.546 0.122491    
## DvR            -0.66838    0.07879  -8.483  < 2e-16 ***
## IvDR            0.12114    0.09504   1.275 0.202745    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.116 on 991 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09438,    Adjusted R-squared:  0.09073 
## F-statistic: 25.82 on 4 and 991 DF,  p-value: < 2.2e-16

a2. vaxxBehavior ~ AFFECT * ruralVother + partyID

m4.cc <- lm(vaxxBehavior ~ ruralVother * index_AFexp_w3 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_AFexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.8900 -0.6252  0.3657  0.8177  1.7111 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.05174    0.04904  62.232  < 2e-16 ***
## ruralVother                 0.41401    0.09457   4.378 1.33e-05 ***
## index_AFexp_w3              0.46406    0.18206   2.549   0.0110 *  
## DvR                        -0.66542    0.07864  -8.461  < 2e-16 ***
## IvDR                        0.11410    0.09491   1.202   0.2296    
## ruralVother:index_AFexp_w3 -0.80397    0.36188  -2.222   0.0265 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.114 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09888,    Adjusted R-squared:  0.09433 
## F-statistic: 21.73 on 5 and 990 DF,  p-value: < 2.2e-16

b1. vaxxBehavior ~ AFFECT + whiteVother + partyID

m3.cc <- lm(vaxxBehavior ~ whiteVother + index_AFexp_w3 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother + index_AFexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7666 -0.5395  0.4047  0.8895  1.2813 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.17796    0.04517  70.352  < 2e-16 ***
## whiteVother     0.05784    0.08253   0.701    0.484    
## index_AFexp_w3  0.21992    0.14985   1.468    0.143    
## DvR            -0.68169    0.08193  -8.320 2.89e-16 ***
## IvDR            0.14383    0.09603   1.498    0.135    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.124 on 991 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08174,    Adjusted R-squared:  0.07803 
## F-statistic: 22.05 on 4 and 991 DF,  p-value: < 2.2e-16

b2. vaxxBehavior ~ AFFECT * whiteVother + partyID

m4.cc <- lm(vaxxBehavior ~ whiteVother * index_AFexp_w3 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_AFexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6890 -0.5290  0.3828  0.8637  1.3610 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.18412    0.04556  69.884  < 2e-16 ***
## whiteVother                 0.09147    0.08873   1.031    0.303    
## index_AFexp_w3              0.16486    0.15905   1.037    0.300    
## DvR                        -0.68250    0.08194  -8.330 2.68e-16 ***
## IvDR                        0.13963    0.09611   1.453    0.147    
## whiteVother:index_AFexp_w3 -0.32596    0.31575  -1.032    0.302    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.124 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08272,    Adjusted R-squared:  0.07809 
## F-statistic: 17.86 on 5 and 990 DF,  p-value: < 2.2e-16

c1. vaxxBehavior ~ AFFECT + blackVother + partyID

m3.cc <- lm(vaxxBehavior ~ blackVother + index_AFexp_w3 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother + index_AFexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7400 -0.4615  0.3794  0.8841  1.4716 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.07871    0.06367  48.350   <2e-16 ***
## blackVother     0.21656    0.11891   1.821   0.0689 .  
## index_AFexp_w3  0.23246    0.14980   1.552   0.1210    
## DvR            -0.73068    0.08100  -9.021   <2e-16 ***
## IvDR            0.13226    0.09551   1.385   0.1664    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.122 on 991 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08435,    Adjusted R-squared:  0.08065 
## F-statistic: 22.82 on 4 and 991 DF,  p-value: < 2.2e-16

c2. vaxxBehavior ~ AFFECT * blackVother + partyID

m4.cc <- lm(vaxxBehavior ~ blackVother * index_AFexp_w3 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_AFexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7219 -0.4979  0.3780  0.8806  1.6091 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.06372    0.06902  44.391   <2e-16 ***
## blackVother                 0.25379    0.13604   1.866   0.0624 .  
## index_AFexp_w3              0.31403    0.20823   1.508   0.1318    
## DvR                        -0.73201    0.08106  -9.030   <2e-16 ***
## IvDR                        0.13157    0.09555   1.377   0.1688    
## blackVother:index_AFexp_w3 -0.23465    0.41592  -0.564   0.5728    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.122 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08464,    Adjusted R-squared:  0.08002 
## F-statistic: 18.31 on 5 and 990 DF,  p-value: < 2.2e-16

d1. vaxxBehavior ~ AFFECT + education.c + partyID

m3.cc <- lm(vaxxBehavior ~ edu.c + index_AFexp_w3 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c + index_AFexp_w3 + DvR + IvDR, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.8290 -0.4303  0.3346  0.8424  1.9366 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.14461    0.04182  75.187  < 2e-16 ***
## edu.c           0.05807    0.01352   4.294 1.93e-05 ***
## index_AFexp_w3  0.25335    0.14865   1.704   0.0886 .  
## DvR            -0.69705    0.07827  -8.906  < 2e-16 ***
## IvDR            0.12544    0.09479   1.323   0.1860    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.114 on 991 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09806,    Adjusted R-squared:  0.09442 
## F-statistic: 26.94 on 4 and 991 DF,  p-value: < 2.2e-16

d2. vaxxBehavior ~ AFFECT * education.c + partyID

m4.cc <- lm(vaxxBehavior ~ edu.c * index_AFexp_w3 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_AFexp_w3 + DvR + IvDR, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.8620 -0.4301  0.3385  0.8383  1.8885 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           3.14734    0.04206  74.828   <2e-16 ***
## edu.c                 0.05458    0.01462   3.732   0.0002 ***
## index_AFexp_w3        0.23942    0.15034   1.593   0.1116    
## DvR                  -0.69906    0.07835  -8.922   <2e-16 ***
## IvDR                  0.12481    0.09483   1.316   0.1884    
## edu.c:index_AFexp_w3  0.03546    0.05640   0.629   0.5297    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.114 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09842,    Adjusted R-squared:  0.09387 
## F-statistic: 21.61 on 5 and 990 DF,  p-value: < 2.2e-16

C. Threat

i. Wave 1 (excluding partyID)

a1. vaxxAttitudes ~ THREAT * ruralVother

m3.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_TRexp_w1, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_TRexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8154 -1.6715  0.2941  2.2524  2.8823 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.45996    0.05317   8.650  < 2e-16 ***
## ruralVother                 0.45806    0.10634   4.307  1.7e-05 ***
## index_TRexp_w1             -0.14567    0.17830  -0.817    0.414    
## ruralVother:index_TRexp_w1  0.03479    0.35660   0.098    0.922    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.144 on 3277 degrees of freedom
## Multiple R-squared:  0.00752,    Adjusted R-squared:  0.006612 
## F-statistic: 8.277 on 3 and 3277 DF,  p-value: 1.749e-05

a2. vaxxAttitudes ~ THREAT * ruralVother

m4.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_TRexp_w1, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_TRexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8154 -1.6715  0.2941  2.2524  2.8823 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.45996    0.05317   8.650  < 2e-16 ***
## ruralVother                 0.45806    0.10634   4.307  1.7e-05 ***
## index_TRexp_w1             -0.14567    0.17830  -0.817    0.414    
## ruralVother:index_TRexp_w1  0.03479    0.35660   0.098    0.922    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.144 on 3277 degrees of freedom
## Multiple R-squared:  0.00752,    Adjusted R-squared:  0.006612 
## F-statistic: 8.277 on 3 and 3277 DF,  p-value: 1.749e-05

b1. vaxxAttitudes ~ THREAT * whiteVother

m5.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_TRexp_w1, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_TRexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8334 -1.5498  0.3718  2.2769  2.6007 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.58170    0.04526  12.852   <2e-16 ***
## whiteVother                -0.07508    0.09053  -0.829    0.407    
## index_TRexp_w1             -0.08570    0.14850  -0.577    0.564    
## whiteVother:index_TRexp_w1  0.31930    0.29700   1.075    0.282    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.151 on 3277 degrees of freedom
## Multiple R-squared:  0.001308,   Adjusted R-squared:  0.0003936 
## F-statistic: 1.431 on 3 and 3277 DF,  p-value: 0.2319

b2. vaxxAttitudes ~ THREAT * whiteVother

m6.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_TRexp_w1, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_TRexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8334 -1.5498  0.3718  2.2769  2.6007 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.58170    0.04526  12.852   <2e-16 ***
## whiteVother                -0.07508    0.09053  -0.829    0.407    
## index_TRexp_w1             -0.08570    0.14850  -0.577    0.564    
## whiteVother:index_TRexp_w1  0.31930    0.29700   1.075    0.282    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.151 on 3277 degrees of freedom
## Multiple R-squared:  0.001308,   Adjusted R-squared:  0.0003936 
## F-statistic: 1.431 on 3 and 3277 DF,  p-value: 0.2319

c1. vaxxAttitudes ~ THREAT * blackVother

m4.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_AFexp_w1, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_AFexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.2531 -1.5965  0.3243  2.0450  3.3489 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.20789    0.06863   3.029  0.00247 ** 
## blackVother                 0.80905    0.13725   5.895 4.14e-09 ***
## index_AFexp_w1              0.68634    0.16431   4.177 3.03e-05 ***
## blackVother:index_AFexp_w1 -0.10534    0.32863  -0.321  0.74858    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.129 on 3277 degrees of freedom
## Multiple R-squared:  0.02102,    Adjusted R-squared:  0.02013 
## F-statistic: 23.46 on 3 and 3277 DF,  p-value: 5.116e-15

c2. vaxxAttitudes ~ THREAT * blackVother

m4.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_AFexp_w1, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_AFexp_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.2531 -1.5965  0.3243  2.0450  3.3489 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.20789    0.06863   3.029  0.00247 ** 
## blackVother                 0.80905    0.13725   5.895 4.14e-09 ***
## index_AFexp_w1              0.68634    0.16431   4.177 3.03e-05 ***
## blackVother:index_AFexp_w1 -0.10534    0.32863  -0.321  0.74858    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.129 on 3277 degrees of freedom
## Multiple R-squared:  0.02102,    Adjusted R-squared:  0.02013 
## F-statistic: 23.46 on 3 and 3277 DF,  p-value: 5.116e-15

d1. vaxxAttitudes ~ AFFECT + education.c

m3.cc <- lm(vaxxAttitudes_w1 ~ edu.c + index_AFexp_w1, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c + index_AFexp_w1, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.3113 -1.4730  0.2927  2.0174  3.8604 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.51609    0.04237  12.181  < 2e-16 ***
## edu.c           0.09335    0.01315   7.097 1.55e-12 ***
## index_AFexp_w1  0.58368    0.12141   4.807 1.60e-06 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.129 on 3278 degrees of freedom
## Multiple R-squared:  0.02092,    Adjusted R-squared:  0.02032 
## F-statistic: 35.02 on 2 and 3278 DF,  p-value: 8.954e-16

d2. vaxxAttitudes ~ AFFECT * education.c

m4.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_AFexp_w1, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_AFexp_w1, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.3770 -1.4666  0.3089  1.9974  3.7250 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           0.51719    0.04240  12.196  < 2e-16 ***
## edu.c                 0.08983    0.01422   6.318 3.01e-10 ***
## index_AFexp_w1        0.58523    0.12145   4.819 1.51e-06 ***
## edu.c:index_AFexp_w1  0.02907    0.04462   0.652    0.515    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.129 on 3277 degrees of freedom
## Multiple R-squared:  0.02105,    Adjusted R-squared:  0.02015 
## F-statistic: 23.48 on 3 and 3277 DF,  p-value: 4.918e-15

ii. Wave 2 (excluding partyID)

a1. vaxxAttitudes ~ THREAT * ruralVother

m5.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_TRexp_w2, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_TRexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.4626 -1.4552 -0.0979  1.8528  3.0409 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.25746    0.05945   4.331 1.55e-05 ***
## ruralVother                 0.40152    0.11890   3.377 0.000744 ***
## index_TRexp_w2             -0.10269    0.20554  -0.500 0.617398    
## ruralVother:index_TRexp_w2  0.23501    0.41109   0.572 0.567594    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.092 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.005233,   Adjusted R-squared:  0.00401 
## F-statistic:  4.28 on 3 and 2441 DF,  p-value: 0.005067

a2. vaxxAttitudes ~ THREAT * ruralVother

m6.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_TRexp_w2, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_TRexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.4626 -1.4552 -0.0979  1.8528  3.0409 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.25746    0.05945   4.331 1.55e-05 ***
## ruralVother                 0.40152    0.11890   3.377 0.000744 ***
## index_TRexp_w2             -0.10269    0.20554  -0.500 0.617398    
## ruralVother:index_TRexp_w2  0.23501    0.41109   0.572 0.567594    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.092 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.005233,   Adjusted R-squared:  0.00401 
## F-statistic:  4.28 on 3 and 2441 DF,  p-value: 0.005067

b1. vaxxAttitudes ~ THREAT * whiteVother

m5.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_TRexp_w2, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_TRexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.6172 -1.3874 -0.2106  1.7280  3.1416 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.34973    0.05147   6.795 1.36e-11 ***
## whiteVother                -0.12388    0.10294  -1.203   0.2289    
## index_TRexp_w2              0.07434    0.17485   0.425   0.6707    
## whiteVother:index_TRexp_w2  0.65407    0.34970   1.870   0.0616 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.093 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.003664,   Adjusted R-squared:  0.00244 
## F-statistic: 2.992 on 3 and 2441 DF,  p-value: 0.0298

b2. vaxxAttitudes ~ THREAT * whiteVother

m6.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_TRexp_w2, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_TRexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.6172 -1.3874 -0.2106  1.7280  3.1416 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.34973    0.05147   6.795 1.36e-11 ***
## whiteVother                -0.12388    0.10294  -1.203   0.2289    
## index_TRexp_w2              0.07434    0.17485   0.425   0.6707    
## whiteVother:index_TRexp_w2  0.65407    0.34970   1.870   0.0616 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.093 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.003664,   Adjusted R-squared:  0.00244 
## F-statistic: 2.992 on 3 and 2441 DF,  p-value: 0.0298

c1. vaxxAttitudes ~ THREAT * blackVother

m5.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_TRexp_w2, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_TRexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.5927 -1.4438  0.1563  1.5908  3.5801 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.12699    0.07508   1.691   0.0909 .  
## blackVother                 0.63368    0.15017   4.220 2.53e-05 ***
## index_TRexp_w2              0.09086    0.22146   0.410   0.6816    
## blackVother:index_TRexp_w2 -0.54783    0.44292  -1.237   0.2163    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.083 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.01347,    Adjusted R-squared:  0.01226 
## F-statistic: 11.11 on 3 and 2441 DF,  p-value: 3.041e-07

c2. vaxxAttitudes ~ THREAT * blackVother

m6.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_TRexp_w2, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_TRexp_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.5927 -1.4438  0.1563  1.5908  3.5801 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.12699    0.07508   1.691   0.0909 .  
## blackVother                 0.63368    0.15017   4.220 2.53e-05 ***
## index_TRexp_w2              0.09086    0.22146   0.410   0.6816    
## blackVother:index_TRexp_w2 -0.54783    0.44292  -1.237   0.2163    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.083 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.01347,    Adjusted R-squared:  0.01226 
## F-statistic: 11.11 on 3 and 2441 DF,  p-value: 3.041e-07

d1. vaxxAttitudes ~ AFFECT + education.c

m3.cc <- lm(vaxxAttitudes_w2 ~ edu.c + index_AFexp_w2, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c + index_AFexp_w2, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.7496 -1.4398 -0.1695  1.7311  3.6000 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.33112    0.04687   7.065 2.09e-12 ***
## edu.c           0.06985    0.01641   4.258 2.14e-05 ***
## index_AFexp_w2  0.25890    0.15244   1.698   0.0896 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.088 on 2442 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.00826,    Adjusted R-squared:  0.007447 
## F-statistic: 10.17 on 2 and 2442 DF,  p-value: 3.999e-05

d2. vaxxAttitudes ~ AFFECT * education.c

m4.cc <- lm(vaxxAttitudes_w2 ~ edu.c * index_AFexp_w2, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c * index_AFexp_w2, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.5964 -1.4547 -0.1501  1.7401  3.7096 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           0.32612    0.04702   6.936 5.15e-12 ***
## edu.c                 0.07770    0.01747   4.448 9.04e-06 ***
## index_AFexp_w2        0.27957    0.15324   1.824   0.0682 .  
## edu.c:index_AFexp_w2 -0.07846    0.06001  -1.307   0.1912    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.088 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.008954,   Adjusted R-squared:  0.007736 
## F-statistic: 7.351 on 3 and 2441 DF,  p-value: 6.653e-05

iii. Wave 3 (excluding partyID)

a1. vaxxBehavior ~ THREAT * ruralVother

m5.cc <- lm(vaxxBehavior ~ ruralVother * index_TRexp_w3, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_TRexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3903 -0.3333  0.6545  0.6851  1.3671 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.09084    0.04946  62.498   <2e-16 ***
## ruralVother                 0.45013    0.09891   4.551    6e-06 ***
## index_TRexp_w3             -0.35197    0.21170  -1.663   0.0967 .  
## ruralVother:index_TRexp_w3  0.44852    0.42340   1.059   0.2897    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.157 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.0229, Adjusted R-squared:  0.01995 
## F-statistic: 7.773 on 3 and 995 DF,  p-value: 3.919e-05

a2. vaxxBehavior ~ THREAT * ruralVother

m6.cc <- lm(vaxxBehavior ~ ruralVother * index_TRexp_w3, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_TRexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3903 -0.3333  0.6545  0.6851  1.3671 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.09084    0.04946  62.498   <2e-16 ***
## ruralVother                 0.45013    0.09891   4.551    6e-06 ***
## index_TRexp_w3             -0.35197    0.21170  -1.663   0.0967 .  
## ruralVother:index_TRexp_w3  0.44852    0.42340   1.059   0.2897    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.157 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.0229, Adjusted R-squared:  0.01995 
## F-statistic: 7.773 on 3 and 995 DF,  p-value: 3.919e-05

b1. vaxxBehavior ~ THREAT * whiteVother

m5.cc <- lm(vaxxBehavior ~ whiteVother * index_TRexp_w3, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_TRexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.5009 -0.2303  0.6154  0.8209  0.9547 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.26928    0.04440  73.633  < 2e-16 ***
## whiteVother                 0.23058    0.08880   2.597  0.00955 ** 
## index_TRexp_w3             -0.23166    0.18542  -1.249  0.21180    
## whiteVother:index_TRexp_w3 -0.06692    0.37083  -0.180  0.85682    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.165 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.009749,   Adjusted R-squared:  0.006763 
## F-statistic: 3.265 on 3 and 995 DF,  p-value: 0.02079

b2. vaxxBehavior ~ THREAT * whiteVother

m6.cc <- lm(vaxxBehavior ~ whiteVother * index_TRexp_w3, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_TRexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.5009 -0.2303  0.6154  0.8209  0.9547 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.26928    0.04440  73.633  < 2e-16 ***
## whiteVother                 0.23058    0.08880   2.597  0.00955 ** 
## index_TRexp_w3             -0.23166    0.18542  -1.249  0.21180    
## whiteVother:index_TRexp_w3 -0.06692    0.37083  -0.180  0.85682    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.165 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.009749,   Adjusted R-squared:  0.006763 
## F-statistic: 3.265 on 3 and 995 DF,  p-value: 0.02079

c1. vaxxBehavior ~ THREAT * blackVother

m5.cc <- lm(vaxxBehavior ~ blackVother * index_TRexp_w3, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_TRexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3760 -0.2487  0.7329  0.7776  1.0584 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.23565    0.06287  51.469   <2e-16 ***
## blackVother                -0.03390    0.12573  -0.270    0.787    
## index_TRexp_w3             -0.31316    0.23314  -1.343    0.180    
## blackVother:index_TRexp_w3  0.31666    0.46629   0.679    0.497    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.17 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.002124,   Adjusted R-squared:  -0.0008851 
## F-statistic: 0.7058 on 3 and 995 DF,  p-value: 0.5486

c2. vaxxBehavior ~ THREAT * blackVother

m6.cc <- lm(vaxxBehavior ~ blackVother * index_TRexp_w3, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_TRexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3760 -0.2487  0.7329  0.7776  1.0584 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.23565    0.06287  51.469   <2e-16 ***
## blackVother                -0.03390    0.12573  -0.270    0.787    
## index_TRexp_w3             -0.31316    0.23314  -1.343    0.180    
## blackVother:index_TRexp_w3  0.31666    0.46629   0.679    0.497    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.17 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.002124,   Adjusted R-squared:  -0.0008851 
## F-statistic: 0.7058 on 3 and 995 DF,  p-value: 0.5486

d1. vaxxBehavior ~ AFFECT + education.c

m3.cc <- lm(vaxxBehavior ~ edu.c + index_AFexp_w3, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c + index_AFexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6015 -0.3124  0.6314  0.7438  1.6589 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.17622    0.04038  78.654  < 2e-16 ***
## edu.c           0.05875    0.01403   4.188 3.06e-05 ***
## index_AFexp_w3  0.41977    0.15305   2.743   0.0062 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.157 on 996 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.0233, Adjusted R-squared:  0.02134 
## F-statistic: 11.88 on 2 and 996 DF,  p-value: 7.973e-06

d2. vaxxBehavior ~ AFFECT * education.c

m4.cc <- lm(vaxxBehavior ~ edu.c * index_AFexp_w3, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_AFexp_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6144 -0.3100  0.6304  0.7467  1.5873 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           3.17728    0.04064  78.175  < 2e-16 ***
## edu.c                 0.05736    0.01517   3.781 0.000166 ***
## index_AFexp_w3        0.41442    0.15472   2.679 0.007517 ** 
## edu.c:index_AFexp_w3  0.01407    0.05852   0.240 0.810004    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.157 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.02335,    Adjusted R-squared:  0.02041 
## F-statistic: 7.931 on 3 and 995 DF,  p-value: 3.139e-05

i. Wave 1

a1. vaxxAttitudes ~ THREAT * ruralVother + partyID

m3.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_TRexp_w1 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_TRexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.2426 -1.2372  0.0834  1.7815  3.1438 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.40028    0.05289   7.568 4.88e-14 ***
## ruralVother                 0.30973    0.10438   2.967  0.00303 ** 
## index_TRexp_w1             -0.06052    0.17447  -0.347  0.72871    
## DvR                        -0.97786    0.08244 -11.861  < 2e-16 ***
## IvDR                        0.50338    0.09343   5.387 7.65e-08 ***
## ruralVother:index_TRexp_w1  0.02864    0.34793   0.082  0.93441    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.0582, Adjusted R-squared:  0.05676 
## F-statistic: 40.36 on 5 and 3265 DF,  p-value: < 2.2e-16

a2. vaxxAttitudes ~ THREAT * ruralVother + partyID

m4.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_TRexp_w1 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_TRexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.2426 -1.2372  0.0834  1.7815  3.1438 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.40028    0.05289   7.568 4.88e-14 ***
## ruralVother                 0.30973    0.10438   2.967  0.00303 ** 
## index_TRexp_w1             -0.06052    0.17447  -0.347  0.72871    
## DvR                        -0.97786    0.08244 -11.861  < 2e-16 ***
## IvDR                        0.50338    0.09343   5.387 7.65e-08 ***
## ruralVother:index_TRexp_w1  0.02864    0.34793   0.082  0.93441    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.0582, Adjusted R-squared:  0.05676 
## F-statistic: 40.36 on 5 and 3265 DF,  p-value: < 2.2e-16

b1. vaxxAttitudes ~ THREAT * whiteVother + partyID

m5.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_TRexp_w1 + DvR + IvDR, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_TRexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.5448 -1.3996  0.1295  1.7246  3.4450 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.42985    0.04572   9.403  < 2e-16 ***
## whiteVother                -0.32858    0.09057  -3.628  0.00029 ***
## index_TRexp_w1              0.02383    0.14469   0.165  0.86921    
## DvR                        -1.14321    0.08532 -13.399  < 2e-16 ***
## IvDR                        0.47929    0.09336   5.134 3.01e-07 ***
## whiteVother:index_TRexp_w1  0.55390    0.28875   1.918  0.05516 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.086 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06325,    Adjusted R-squared:  0.06181 
## F-statistic: 44.09 on 5 and 3265 DF,  p-value: < 2.2e-16

b2. vaxxAttitudes ~ THREAT * whiteVother + partyID

m6.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_TRexp_w1 + DvR + IvDR, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_TRexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.5448 -1.3996  0.1295  1.7246  3.4450 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.42985    0.04572   9.403  < 2e-16 ***
## whiteVother                -0.32858    0.09057  -3.628  0.00029 ***
## index_TRexp_w1              0.02383    0.14469   0.165  0.86921    
## DvR                        -1.14321    0.08532 -13.399  < 2e-16 ***
## IvDR                        0.47929    0.09336   5.134 3.01e-07 ***
## whiteVother:index_TRexp_w1  0.55390    0.28875   1.918  0.05516 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.086 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06325,    Adjusted R-squared:  0.06181 
## F-statistic: 44.09 on 5 and 3265 DF,  p-value: < 2.2e-16

c1. vaxxAttitudes ~ THREAT * blackVother + partyID

m4.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_AFexp_w1 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_AFexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.8571 -1.4840  0.3593  1.6563  4.1285 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                -0.05717    0.06876  -0.832  0.40572    
## blackVother                 1.24583    0.13588   9.169  < 2e-16 ***
## index_AFexp_w1              0.50517    0.15907   3.176  0.00151 ** 
## DvR                        -1.23077    0.08368 -14.709  < 2e-16 ***
## IvDR                        0.52746    0.09144   5.768 8.76e-09 ***
## blackVother:index_AFexp_w1 -0.01742    0.31732  -0.055  0.95622    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.053 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.09264,    Adjusted R-squared:  0.09125 
## F-statistic: 66.67 on 5 and 3265 DF,  p-value: < 2.2e-16

c2. vaxxAttitudes ~ THREAT * blackVother + partyID

m4.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_AFexp_w1 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_AFexp_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.8571 -1.4840  0.3593  1.6563  4.1285 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                -0.05717    0.06876  -0.832  0.40572    
## blackVother                 1.24583    0.13588   9.169  < 2e-16 ***
## index_AFexp_w1              0.50517    0.15907   3.176  0.00151 ** 
## DvR                        -1.23077    0.08368 -14.709  < 2e-16 ***
## IvDR                        0.52746    0.09144   5.768 8.76e-09 ***
## blackVother:index_AFexp_w1 -0.01742    0.31732  -0.055  0.95622    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.053 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.09264,    Adjusted R-squared:  0.09125 
## F-statistic: 66.67 on 5 and 3265 DF,  p-value: < 2.2e-16

d1. vaxxAttitudes ~ AFFECT + education.c + partyID

m3.cc <- lm(vaxxAttitudes_w1 ~ edu.c + index_AFexp_w1 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c + index_AFexp_w1 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.6332 -1.3744  0.1229  1.7398  4.1274 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.43625    0.04312  10.117  < 2e-16 ***
## edu.c           0.08722    0.01287   6.776 1.46e-11 ***
## index_AFexp_w1  0.40463    0.11936   3.390 0.000707 ***
## DvR            -0.97936    0.08175 -11.981  < 2e-16 ***
## IvDR            0.46198    0.09269   4.984 6.55e-07 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.077 on 3266 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.07055,    Adjusted R-squared:  0.06941 
## F-statistic: 61.98 on 4 and 3266 DF,  p-value: < 2.2e-16

d2. vaxxAttitudes ~ AFFECT * education.c + partyID

m4.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_AFexp_w1 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_AFexp_w1 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.6795 -1.3765  0.1154  1.7464  4.0082 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           0.43732    0.04315  10.134  < 2e-16 ***
## edu.c                 0.08366    0.01391   6.013 2.02e-09 ***
## index_AFexp_w1        0.40619    0.11939   3.402 0.000677 ***
## DvR                  -0.97935    0.08175 -11.979  < 2e-16 ***
## IvDR                  0.46221    0.09270   4.986 6.48e-07 ***
## edu.c:index_AFexp_w1  0.02934    0.04354   0.674 0.500440    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.077 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.07068,    Adjusted R-squared:  0.06926 
## F-statistic: 49.67 on 5 and 3265 DF,  p-value: < 2.2e-16

ii. Wave 2

a1. vaxxAttitudes ~ THREAT * ruralVother + partyID

m5.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_TRexp_w2 + DvR + IvDR, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_TRexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8131 -1.2274  0.0015  1.9574  3.3346 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.19496    0.06074   3.210  0.00135 ** 
## ruralVother                 0.32211    0.11839   2.721  0.00656 ** 
## index_TRexp_w2             -0.06101    0.20404  -0.299  0.76495    
## DvR                        -0.56610    0.09308  -6.082 1.38e-09 ***
## IvDR                        0.46785    0.11181   4.184 2.96e-05 ***
## ruralVother:index_TRexp_w2  0.25513    0.40742   0.626  0.53123    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.071 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.02772,    Adjusted R-squared:  0.02572 
## F-statistic: 13.87 on 5 and 2432 DF,  p-value: 2.196e-13

a2. vaxxAttitudes ~ THREAT * ruralVother + partyID

m6.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_TRexp_w2 + DvR + IvDR, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_TRexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8131 -1.2274  0.0015  1.9574  3.3346 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.19496    0.06074   3.210  0.00135 ** 
## ruralVother                 0.32211    0.11839   2.721  0.00656 ** 
## index_TRexp_w2             -0.06101    0.20404  -0.299  0.76495    
## DvR                        -0.56610    0.09308  -6.082 1.38e-09 ***
## IvDR                        0.46785    0.11181   4.184 2.96e-05 ***
## ruralVother:index_TRexp_w2  0.25513    0.40742   0.626  0.53123    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.071 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.02772,    Adjusted R-squared:  0.02572 
## F-statistic: 13.87 on 5 and 2432 DF,  p-value: 2.196e-13

b1. vaxxAttitudes ~ THREAT * whiteVother + partyID

m5.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_TRexp_w2 + DvR + IvDR, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_TRexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0664 -1.2101 -0.0337  1.8812  3.4906 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.23189    0.05350   4.334 1.52e-05 ***
## whiteVother                -0.28474    0.10484  -2.716  0.00666 ** 
## index_TRexp_w2              0.12662    0.17385   0.728  0.46649    
## DvR                        -0.71101    0.09618  -7.392 1.97e-13 ***
## IvDR                        0.43720    0.11171   3.914 9.34e-05 ***
## whiteVother:index_TRexp_w2  0.72622    0.34667   2.095  0.03628 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.065 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03279,    Adjusted R-squared:  0.0308 
## F-statistic: 16.49 on 5 and 2432 DF,  p-value: 4.878e-16

b2. vaxxAttitudes ~ THREAT * whiteVother + partyID

m6.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_TRexp_w2 + DvR + IvDR, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_TRexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0664 -1.2101 -0.0337  1.8812  3.4906 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 0.23189    0.05350   4.334 1.52e-05 ***
## whiteVother                -0.28474    0.10484  -2.716  0.00666 ** 
## index_TRexp_w2              0.12662    0.17385   0.728  0.46649    
## DvR                        -0.71101    0.09618  -7.392 1.97e-13 ***
## IvDR                        0.43720    0.11171   3.914 9.34e-05 ***
## whiteVother:index_TRexp_w2  0.72622    0.34667   2.095  0.03628 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.065 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03279,    Adjusted R-squared:  0.0308 
## F-statistic: 16.49 on 5 and 2432 DF,  p-value: 4.878e-16

c1. vaxxAttitudes ~ THREAT * blackVother + partyID

m5.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_TRexp_w2 + DvR + IvDR, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_TRexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0887 -1.1367 -0.0328  1.9025  3.9037 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                -0.09075    0.07767  -1.168    0.243    
## blackVother                 0.94121    0.15201   6.192 6.96e-10 ***
## index_TRexp_w2              0.14223    0.21962   0.648    0.517    
## DvR                        -0.80513    0.09515  -8.462  < 2e-16 ***
## IvDR                        0.48298    0.11046   4.372 1.28e-05 ***
## blackVother:index_TRexp_w2 -0.64555    0.43847  -1.472    0.141    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.047 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.04987,    Adjusted R-squared:  0.04791 
## F-statistic: 25.53 on 5 and 2432 DF,  p-value: < 2.2e-16

c2. vaxxAttitudes ~ THREAT * blackVother + partyID

m6.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_TRexp_w2 + DvR + IvDR, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_TRexp_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0887 -1.1367 -0.0328  1.9025  3.9037 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                -0.09075    0.07767  -1.168    0.243    
## blackVother                 0.94121    0.15201   6.192 6.96e-10 ***
## index_TRexp_w2              0.14223    0.21962   0.648    0.517    
## DvR                        -0.80513    0.09515  -8.462  < 2e-16 ***
## IvDR                        0.48298    0.11046   4.372 1.28e-05 ***
## blackVother:index_TRexp_w2 -0.64555    0.43847  -1.472    0.141    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.047 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.04987,    Adjusted R-squared:  0.04791 
## F-statistic: 25.53 on 5 and 2432 DF,  p-value: < 2.2e-16

d1. vaxxAttitudes ~ AFFECT + education.c + partyID

m3.cc <- lm(vaxxAttitudes_w2 ~ edu.c + index_AFexp_w2 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c + index_AFexp_w2 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9893 -1.2311  0.0415  1.9022  3.7817 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     0.25473    0.04940   5.157 2.72e-07 ***
## edu.c           0.06729    0.01626   4.138 3.62e-05 ***
## index_AFexp_w2  0.14518    0.15177   0.957    0.339    
## DvR            -0.58215    0.09273  -6.278 4.05e-10 ***
## IvDR            0.45949    0.11095   4.141 3.57e-05 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.066 on 2433 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03156,    Adjusted R-squared:  0.02997 
## F-statistic: 19.82 on 4 and 2433 DF,  p-value: 4.491e-16

d2. vaxxAttitudes ~ AFFECT * education.c + partyID

m4.cc <- lm(vaxxAttitudes_w2 ~ edu.c * index_AFexp_w2 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c * index_AFexp_w2 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9069 -1.2361  0.0618  1.9093  3.8964 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           0.24970    0.04953   5.042 4.95e-07 ***
## edu.c                 0.07545    0.01731   4.358 1.37e-05 ***
## index_AFexp_w2        0.16640    0.15252   1.091    0.275    
## DvR                  -0.58321    0.09272  -6.290 3.75e-10 ***
## IvDR                  0.45836    0.11094   4.132 3.72e-05 ***
## edu.c:index_AFexp_w2 -0.08145    0.05941  -1.371    0.170    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.066 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03231,    Adjusted R-squared:  0.03032 
## F-statistic: 16.24 on 5 and 2432 DF,  p-value: 8.713e-16

iii. Wave 3

a1. vaxxBehavior ~ THREAT * ruralVother + partyID

m5.cc <- lm(vaxxBehavior ~ ruralVother * index_TRexp_w3 + DvR + IvDR, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_TRexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7235 -0.5850  0.3555  0.8250  1.5970 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.05995    0.04949  61.824  < 2e-16 ***
## ruralVother                 0.37793    0.09573   3.948 8.44e-05 ***
## index_TRexp_w3             -0.41726    0.20454  -2.040   0.0416 *  
## DvR                        -0.69100    0.07818  -8.838  < 2e-16 ***
## IvDR                        0.11033    0.09522   1.159   0.2468    
## ruralVother:index_TRexp_w3  0.51633    0.40816   1.265   0.2062    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.115 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.096,  Adjusted R-squared:  0.09144 
## F-statistic: 21.03 on 5 and 990 DF,  p-value: < 2.2e-16

a2. vaxxBehavior ~ THREAT * ruralVother + partyID

m6.cc <- lm(vaxxBehavior ~ ruralVother * index_TRexp_w3 + DvR + IvDR, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_TRexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7235 -0.5850  0.3555  0.8250  1.5970 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.05995    0.04949  61.824  < 2e-16 ***
## ruralVother                 0.37793    0.09573   3.948 8.44e-05 ***
## index_TRexp_w3             -0.41726    0.20454  -2.040   0.0416 *  
## DvR                        -0.69100    0.07818  -8.838  < 2e-16 ***
## IvDR                        0.11033    0.09522   1.159   0.2468    
## ruralVother:index_TRexp_w3  0.51633    0.40816   1.265   0.2062    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.115 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.096,  Adjusted R-squared:  0.09144 
## F-statistic: 21.03 on 5 and 990 DF,  p-value: < 2.2e-16

b1. vaxxBehavior ~ THREAT * whiteVother + partyID

m5.cc <- lm(vaxxBehavior ~ whiteVother * index_TRexp_w3 + DvR + IvDR, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_TRexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7201 -0.5371  0.3916  0.8887  1.2910 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.17572    0.04572  69.453   <2e-16 ***
## whiteVother                 0.05122    0.08862   0.578    0.563    
## index_TRexp_w3             -0.26112    0.17918  -1.457    0.145    
## DvR                        -0.70183    0.08133  -8.630   <2e-16 ***
## IvDR                        0.13439    0.09648   1.393    0.164    
## whiteVother:index_TRexp_w3 -0.04099    0.35897  -0.114    0.909    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.124 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08193,    Adjusted R-squared:  0.07729 
## F-statistic: 17.67 on 5 and 990 DF,  p-value: < 2.2e-16

b2. vaxxBehavior ~ THREAT * whiteVother + partyID

m6.cc <- lm(vaxxBehavior ~ whiteVother * index_TRexp_w3 + DvR + IvDR, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_TRexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7201 -0.5371  0.3916  0.8887  1.2910 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.17572    0.04572  69.453   <2e-16 ***
## whiteVother                 0.05122    0.08862   0.578    0.563    
## index_TRexp_w3             -0.26112    0.17918  -1.457    0.145    
## DvR                        -0.70183    0.08133  -8.630   <2e-16 ***
## IvDR                        0.13439    0.09648   1.393    0.164    
## whiteVother:index_TRexp_w3 -0.04099    0.35897  -0.114    0.909    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.124 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08193,    Adjusted R-squared:  0.07729 
## F-statistic: 17.67 on 5 and 990 DF,  p-value: < 2.2e-16

c1. vaxxBehavior ~ THREAT * blackVother + partyID

m5.cc <- lm(vaxxBehavior ~ blackVother * index_TRexp_w3 + DvR + IvDR, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_TRexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7269 -0.4899  0.3702  0.8808  1.6454 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.08038    0.06364  48.404   <2e-16 ***
## blackVother                 0.21909    0.12412   1.765   0.0778 .  
## index_TRexp_w3             -0.31974    0.22391  -1.428   0.1536    
## DvR                        -0.74756    0.08063  -9.272   <2e-16 ***
## IvDR                        0.12411    0.09578   1.296   0.1954    
## blackVother:index_TRexp_w3  0.21977    0.44781   0.491   0.6237    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.123 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08439,    Adjusted R-squared:  0.07977 
## F-statistic: 18.25 on 5 and 990 DF,  p-value: < 2.2e-16

c2. vaxxBehavior ~ THREAT * blackVother + partyID

m6.cc <- lm(vaxxBehavior ~ blackVother * index_TRexp_w3 + DvR + IvDR, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_TRexp_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7269 -0.4899  0.3702  0.8808  1.6454 
## 
## Coefficients:
##                            Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                 3.08038    0.06364  48.404   <2e-16 ***
## blackVother                 0.21909    0.12412   1.765   0.0778 .  
## index_TRexp_w3             -0.31974    0.22391  -1.428   0.1536    
## DvR                        -0.74756    0.08063  -9.272   <2e-16 ***
## IvDR                        0.12411    0.09578   1.296   0.1954    
## blackVother:index_TRexp_w3  0.21977    0.44781   0.491   0.6237    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.123 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08439,    Adjusted R-squared:  0.07977 
## F-statistic: 18.25 on 5 and 990 DF,  p-value: < 2.2e-16

d1. vaxxBehavior ~ AFFECT + education.c + partyID

m3.cc <- lm(vaxxBehavior ~ edu.c + index_AFexp_w3 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c + index_AFexp_w3 + DvR + IvDR, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.8290 -0.4303  0.3346  0.8424  1.9366 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)     3.14461    0.04182  75.187  < 2e-16 ***
## edu.c           0.05807    0.01352   4.294 1.93e-05 ***
## index_AFexp_w3  0.25335    0.14865   1.704   0.0886 .  
## DvR            -0.69705    0.07827  -8.906  < 2e-16 ***
## IvDR            0.12544    0.09479   1.323   0.1860    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.114 on 991 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09806,    Adjusted R-squared:  0.09442 
## F-statistic: 26.94 on 4 and 991 DF,  p-value: < 2.2e-16

d2. vaxxBehavior ~ AFFECT * education.c + partyID

m4.cc <- lm(vaxxBehavior ~ edu.c * index_AFexp_w3 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_AFexp_w3 + DvR + IvDR, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.8620 -0.4301  0.3385  0.8383  1.8885 
## 
## Coefficients:
##                      Estimate Std. Error t value Pr(>|t|)    
## (Intercept)           3.14734    0.04206  74.828   <2e-16 ***
## edu.c                 0.05458    0.01462   3.732   0.0002 ***
## index_AFexp_w3        0.23942    0.15034   1.593   0.1116    
## DvR                  -0.69906    0.07835  -8.922   <2e-16 ***
## IvDR                  0.12481    0.09483   1.316   0.1884    
## edu.c:index_AFexp_w3  0.03546    0.05640   0.629   0.5297    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.114 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09842,    Adjusted R-squared:  0.09387 
## F-statistic: 21.61 on 5 and 990 DF,  p-value: < 2.2e-16

D. Analytic - Affect

i. Wave 1 (excluding partyID)

a1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * ruralVother

m5.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_diffANAF_w1, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_diffANAF_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8451 -1.6551  0.2948  2.2361  2.9863 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.43703    0.05600   7.803 8.04e-15 ***
## ruralVother                    0.48078    0.11201   4.292 1.82e-05 ***
## index_diffANAF_w1             -0.12988    0.09144  -1.420    0.156    
## ruralVother:index_diffANAF_w1  0.07258    0.18288   0.397    0.691    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.144 on 3277 degrees of freedom
## Multiple R-squared:  0.007964,   Adjusted R-squared:  0.007056 
## F-statistic: 8.769 on 3 and 3277 DF,  p-value: 8.634e-06

a2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * ruralVother

m6.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_diffANAF_w1, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_diffANAF_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8451 -1.6551  0.2948  2.2361  2.9863 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.43703    0.05600   7.803 8.04e-15 ***
## ruralVother                    0.48078    0.11201   4.292 1.82e-05 ***
## index_diffANAF_w1             -0.12988    0.09144  -1.420    0.156    
## ruralVother:index_diffANAF_w1  0.07258    0.18288   0.397    0.691    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.144 on 3277 degrees of freedom
## Multiple R-squared:  0.007964,   Adjusted R-squared:  0.007056 
## F-statistic: 8.769 on 3 and 3277 DF,  p-value: 8.634e-06

b1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * whiteVother

m7.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_diffANAF_w1, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_diffANAF_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9425 -1.5445  0.3775  2.2509  2.6256 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.57043    0.04686  12.173   <2e-16 ***
## whiteVother                   -0.05479    0.09372  -0.585    0.559    
## index_diffANAF_w1             -0.07330    0.07495  -0.978    0.328    
## whiteVother:index_diffANAF_w1  0.20445    0.14991   1.364    0.173    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.15 on 3277 degrees of freedom
## Multiple R-squared:  0.001847,   Adjusted R-squared:  0.0009332 
## F-statistic: 2.021 on 3 and 3277 DF,  p-value: 0.1088

b2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * whiteVother

m8.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_diffANAF_w1, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_diffANAF_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9425 -1.5445  0.3775  2.2509  2.6256 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.57043    0.04686  12.173   <2e-16 ***
## whiteVother                   -0.05479    0.09372  -0.585    0.559    
## index_diffANAF_w1             -0.07330    0.07495  -0.978    0.328    
## whiteVother:index_diffANAF_w1  0.20445    0.14991   1.364    0.173    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.15 on 3277 degrees of freedom
## Multiple R-squared:  0.001847,   Adjusted R-squared:  0.0009332 
## F-statistic: 2.021 on 3 and 3277 DF,  p-value: 0.1088

c1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * blackVother

m5.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_diffANAF_w1, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_diffANAF_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9501 -1.6621  0.2927  2.2004  3.2861 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.28331    0.07012   4.040 5.46e-05 ***
## blackVother                    0.76292    0.14023   5.440 5.71e-08 ***
## index_diffANAF_w1             -0.17654    0.09584  -1.842   0.0656 .  
## blackVother:index_diffANAF_w1  0.06242    0.19168   0.326   0.7447    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.137 on 3277 degrees of freedom
## Multiple R-squared:  0.01395,    Adjusted R-squared:  0.01305 
## F-statistic: 15.45 on 3 and 3277 DF,  p-value: 5.553e-10

c2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * blackVother

m6.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_diffANAF_w1, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_diffANAF_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9501 -1.6621  0.2927  2.2004  3.2861 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.28331    0.07012   4.040 5.46e-05 ***
## blackVother                    0.76292    0.14023   5.440 5.71e-08 ***
## index_diffANAF_w1             -0.17654    0.09584  -1.842   0.0656 .  
## blackVother:index_diffANAF_w1  0.06242    0.19168   0.326   0.7447    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.137 on 3277 degrees of freedom
## Multiple R-squared:  0.01395,    Adjusted R-squared:  0.01305 
## F-statistic: 15.45 on 3 and 3277 DF,  p-value: 5.553e-10

d1. vaxxAttitudes ~ (ANALYTIC - AFFECT) + education.c

m3.cc <- lm(vaxxAttitudes_w1 ~ edu.c + index_diffANAF_w1, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c + index_diffANAF_w1, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0002 -1.5307  0.2744  2.1413  3.7391 
## 
## Coefficients:
##                   Estimate Std. Error t value Pr(>|t|)    
## (Intercept)        0.57332    0.04405  13.016  < 2e-16 ***
## edu.c              0.09116    0.01319   6.910 5.78e-12 ***
## index_diffANAF_w1 -0.12439    0.07200  -1.728   0.0841 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.136 on 3278 degrees of freedom
## Multiple R-squared:  0.01491,    Adjusted R-squared:  0.01431 
## F-statistic: 24.81 on 2 and 3278 DF,  p-value: 2.019e-11

d2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * education.c

m4.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_diffANAF_w1, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_diffANAF_w1, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0590 -1.5010  0.2806  2.1274  3.6360 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.57371    0.04406  13.022  < 2e-16 ***
## edu.c                    0.08721    0.01455   5.993 2.28e-09 ***
## index_diffANAF_w1       -0.12708    0.07213  -1.762   0.0782 .  
## edu.c:index_diffANAF_w1 -0.01649    0.02558  -0.645   0.5191    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.136 on 3277 degrees of freedom
## Multiple R-squared:  0.01504,    Adjusted R-squared:  0.01414 
## F-statistic: 16.68 on 3 and 3277 DF,  p-value: 9.44e-11

ii. Wave 2 (excluding partyID)

a1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * ruralVother

m7.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_diffANAF_w2, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_diffANAF_w2, 
##     data = dw)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
## -3.481 -1.456 -0.132  1.704  3.162 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.22729    0.06135   3.705 0.000216 ***
## ruralVother                    0.46104    0.12269   3.758 0.000175 ***
## index_diffANAF_w2             -0.15519    0.11231  -1.382 0.167159    
## ruralVother:index_diffANAF_w2  0.32163    0.22463   1.432 0.152321    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.006094,   Adjusted R-squared:  0.004873 
## F-statistic: 4.989 on 3 and 2441 DF,  p-value: 0.001882

a2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * ruralVother

m8.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_diffANAF_w2, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_diffANAF_w2, 
##     data = dw)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
## -3.481 -1.456 -0.132  1.704  3.162 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.22729    0.06135   3.705 0.000216 ***
## ruralVother                    0.46104    0.12269   3.758 0.000175 ***
## index_diffANAF_w2             -0.15519    0.11231  -1.382 0.167159    
## ruralVother:index_diffANAF_w2  0.32163    0.22463   1.432 0.152321    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.006094,   Adjusted R-squared:  0.004873 
## F-statistic: 4.989 on 3 and 2441 DF,  p-value: 0.001882

b1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * whiteVother

m7.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_diffANAF_w2, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_diffANAF_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8218 -1.3790 -0.1838  1.7231  3.1436 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.34071    0.05338   6.383 2.07e-10 ***
## whiteVother                   -0.07661    0.10676  -0.718   0.4731    
## index_diffANAF_w2             -0.01043    0.09299  -0.112   0.9107    
## whiteVother:index_diffANAF_w2  0.46481    0.18597   2.499   0.0125 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.092 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.004992,   Adjusted R-squared:  0.003769 
## F-statistic: 4.082 on 3 and 2441 DF,  p-value: 0.006674

b2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * whiteVother

m8.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_diffANAF_w2, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_diffANAF_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8218 -1.3790 -0.1838  1.7231  3.1436 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.34071    0.05338   6.383 2.07e-10 ***
## whiteVother                   -0.07661    0.10676  -0.718   0.4731    
## index_diffANAF_w2             -0.01043    0.09299  -0.112   0.9107    
## whiteVother:index_diffANAF_w2  0.46481    0.18597   2.499   0.0125 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.092 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.004992,   Adjusted R-squared:  0.003769 
## F-statistic: 4.082 on 3 and 2441 DF,  p-value: 0.006674

c1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * blackVother

m7.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_diffANAF_w2, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_diffANAF_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.7314 -1.4224  0.1946  1.6396  3.4522 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.11017    0.08105   1.359  0.17419    
## blackVother                    0.62441    0.16211   3.852  0.00012 ***
## index_diffANAF_w2             -0.02250    0.12007  -0.187  0.85138    
## blackVother:index_diffANAF_w2 -0.29399    0.24014  -1.224  0.22097    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.082 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.01404,    Adjusted R-squared:  0.01283 
## F-statistic: 11.59 on 3 and 2441 DF,  p-value: 1.537e-07

c2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * blackVother

m8.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_diffANAF_w2, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_diffANAF_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.7314 -1.4224  0.1946  1.6396  3.4522 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.11017    0.08105   1.359  0.17419    
## blackVother                    0.62441    0.16211   3.852  0.00012 ***
## index_diffANAF_w2             -0.02250    0.12007  -0.187  0.85138    
## blackVother:index_diffANAF_w2 -0.29399    0.24014  -1.224  0.22097    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.082 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.01404,    Adjusted R-squared:  0.01283 
## F-statistic: 11.59 on 3 and 2441 DF,  p-value: 1.537e-07

d1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * education.c

m7.cc <- lm(vaxxAttitudes_w2 ~ edu.c * index_diffANAF_w2, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c * index_diffANAF_w2, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.5939 -1.4707 -0.1703  1.7160  3.7772 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.34130    0.04980   6.854 9.09e-12 ***
## edu.c                    0.08098    0.01788   4.529 6.21e-06 ***
## index_diffANAF_w2       -0.07894    0.09020  -0.875   0.3816    
## edu.c:index_diffANAF_w2  0.05529    0.03241   1.706   0.0882 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.088 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.008518,   Adjusted R-squared:  0.007299 
## F-statistic:  6.99 on 3 and 2441 DF,  p-value: 0.0001112

d2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * education.c

m8.cc <- lm(vaxxAttitudes_w2 ~ edu.c * index_diffANAF_w2, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c * index_diffANAF_w2, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.5939 -1.4707 -0.1703  1.7160  3.7772 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.34130    0.04980   6.854 9.09e-12 ***
## edu.c                    0.08098    0.01788   4.529 6.21e-06 ***
## index_diffANAF_w2       -0.07894    0.09020  -0.875   0.3816    
## edu.c:index_diffANAF_w2  0.05529    0.03241   1.706   0.0882 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.088 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.008518,   Adjusted R-squared:  0.007299 
## F-statistic:  6.99 on 3 and 2441 DF,  p-value: 0.0001112

iii. Wave 3 (excluding partyID)

a1. vaxxBehavior ~ (ANALYTIC - AFFECT) * ruralVother

m7.cc <- lm(vaxxBehavior ~ ruralVother * index_diffANAF_w3, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_diffANAF_w3, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.4523 -0.3352  0.6434  0.6929  1.6174 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.04090    0.05159  58.947  < 2e-16 ***
## ruralVother                    0.53243    0.10317   5.161 2.97e-07 ***
## index_diffANAF_w3             -0.35400    0.11037  -3.207  0.00138 ** 
## ruralVother:index_diffANAF_w3  0.51583    0.22074   2.337  0.01965 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.153 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.0306, Adjusted R-squared:  0.02768 
## F-statistic: 10.47 on 3 and 995 DF,  p-value: 8.76e-07

a2. vaxxBehavior ~ (ANALYTIC - AFFECT) * ruralVother

m8.cc <- lm(vaxxBehavior ~ ruralVother * index_diffANAF_w3, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_diffANAF_w3, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.4523 -0.3352  0.6434  0.6929  1.6174 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.04090    0.05159  58.947  < 2e-16 ***
## ruralVother                    0.53243    0.10317   5.161 2.97e-07 ***
## index_diffANAF_w3             -0.35400    0.11037  -3.207  0.00138 ** 
## ruralVother:index_diffANAF_w3  0.51583    0.22074   2.337  0.01965 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.153 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.0306, Adjusted R-squared:  0.02768 
## F-statistic: 10.47 on 3 and 995 DF,  p-value: 8.76e-07

b1. vaxxBehavior ~ (ANALYTIC - AFFECT) * whiteVother

m7.cc <- lm(vaxxBehavior ~ whiteVother * index_diffANAF_w3, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_diffANAF_w3, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.5080 -0.2816  0.6214  0.8091  1.1644 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.24941    0.04628  70.209  < 2e-16 ***
## whiteVother                    0.25428    0.09256   2.747  0.00612 ** 
## index_diffANAF_w3             -0.18575    0.09856  -1.885  0.05978 .  
## whiteVother:index_diffANAF_w3  0.08083    0.19712   0.410  0.68186    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.163 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.01296,    Adjusted R-squared:  0.009986 
## F-statistic: 4.356 on 3 and 995 DF,  p-value: 0.004662

b2. vaxxBehavior ~ (ANALYTIC - AFFECT) * whiteVother

m8.cc <- lm(vaxxBehavior ~ whiteVother * index_diffANAF_w3, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_diffANAF_w3, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.5080 -0.2816  0.6214  0.8091  1.1644 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.24941    0.04628  70.209  < 2e-16 ***
## whiteVother                    0.25428    0.09256   2.747  0.00612 ** 
## index_diffANAF_w3             -0.18575    0.09856  -1.885  0.05978 .  
## whiteVother:index_diffANAF_w3  0.08083    0.19712   0.410  0.68186    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.163 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.01296,    Adjusted R-squared:  0.009986 
## F-statistic: 4.356 on 3 and 995 DF,  p-value: 0.004662

c1. vaxxBehavior ~ (ANALYTIC - AFFECT) * blackVother

m7.cc <- lm(vaxxBehavior ~ blackVother * index_diffANAF_w3, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_diffANAF_w3, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.4988 -0.2648  0.7038  0.7910  1.1440 
## 
## Coefficients:
##                                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.196693   0.069122  46.247   <2e-16 ***
## blackVother                    0.001157   0.138245   0.008   0.9933    
## index_diffANAF_w3             -0.251726   0.128124  -1.965   0.0497 *  
## blackVother:index_diffANAF_w3  0.166028   0.256248   0.648   0.5172    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.168 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.005053,   Adjusted R-squared:  0.002054 
## F-statistic: 1.685 on 3 and 995 DF,  p-value: 0.1686

c2. vaxxBehavior ~ (ANALYTIC - AFFECT) * blackVother

m8.cc <- lm(vaxxBehavior ~ blackVother * index_diffANAF_w3, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_diffANAF_w3, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.4988 -0.2648  0.7038  0.7910  1.1440 
## 
## Coefficients:
##                                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.196693   0.069122  46.247   <2e-16 ***
## blackVother                    0.001157   0.138245   0.008   0.9933    
## index_diffANAF_w3             -0.251726   0.128124  -1.965   0.0497 *  
## blackVother:index_diffANAF_w3  0.166028   0.256248   0.648   0.5172    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.168 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.005053,   Adjusted R-squared:  0.002054 
## F-statistic: 1.685 on 3 and 995 DF,  p-value: 0.1686

d1. vaxxBehavior ~ (ANALYTIC - AFFECT) * education.c

m7.cc <- lm(vaxxBehavior ~ edu.c * index_diffANAF_w3, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_diffANAF_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.4975 -0.3134  0.6228  0.7464  1.5815 
## 
## Coefficients:
##                          Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              3.173638   0.042593  74.511  < 2e-16 ***
## edu.c                    0.056651   0.015854   3.573  0.00037 ***
## index_diffANAF_w3       -0.209465   0.092109  -2.274  0.02317 *  
## edu.c:index_diffANAF_w3 -0.004992   0.034753  -0.144  0.88581    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.159 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.02115,    Adjusted R-squared:  0.0182 
## F-statistic: 7.167 on 3 and 995 DF,  p-value: 9.199e-05

d2. vaxxBehavior ~ (ANALYTIC - AFFECT) * education.c

m8.cc <- lm(vaxxBehavior ~ edu.c * index_diffANAF_w3, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_diffANAF_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.4975 -0.3134  0.6228  0.7464  1.5815 
## 
## Coefficients:
##                          Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              3.173638   0.042593  74.511  < 2e-16 ***
## edu.c                    0.056651   0.015854   3.573  0.00037 ***
## index_diffANAF_w3       -0.209465   0.092109  -2.274  0.02317 *  
## edu.c:index_diffANAF_w3 -0.004992   0.034753  -0.144  0.88581    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.159 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.02115,    Adjusted R-squared:  0.0182 
## F-statistic: 7.167 on 3 and 995 DF,  p-value: 9.199e-05

i. Wave 1

a1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * ruralVother + partyID

m5.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_diffANAF_w1 + DvR + IvDR, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_diffANAF_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.3181 -1.2722  0.1056  1.7863  3.2177 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.37931    0.05560   6.823 1.06e-11 ***
## ruralVother                    0.32164    0.10997   2.925  0.00347 ** 
## index_diffANAF_w1             -0.08944    0.08942  -1.000  0.31729    
## DvR                           -0.97763    0.08243 -11.860  < 2e-16 ***
## IvDR                           0.49914    0.09330   5.350 9.41e-08 ***
## ruralVother:index_diffANAF_w1  0.03994    0.17848   0.224  0.82295    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.05852,    Adjusted R-squared:  0.05708 
## F-statistic: 40.59 on 5 and 3265 DF,  p-value: < 2.2e-16

a2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * ruralVother + partyID

m6.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_diffANAF_w1 + DvR + IvDR, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_diffANAF_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.3181 -1.2722  0.1056  1.7863  3.2177 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.37931    0.05560   6.823 1.06e-11 ***
## ruralVother                    0.32164    0.10997   2.925  0.00347 ** 
## index_diffANAF_w1             -0.08944    0.08942  -1.000  0.31729    
## DvR                           -0.97763    0.08243 -11.860  < 2e-16 ***
## IvDR                           0.49914    0.09330   5.350 9.41e-08 ***
## ruralVother:index_diffANAF_w1  0.03994    0.17848   0.224  0.82295    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.05852,    Adjusted R-squared:  0.05708 
## F-statistic: 40.59 on 5 and 3265 DF,  p-value: < 2.2e-16

b1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * whiteVother + partyID

m7.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_diffANAF_w1 + DvR + IvDR, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_diffANAF_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.7004 -1.4231  0.1391  1.7367  3.4121 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.41669    0.04728   8.814  < 2e-16 ***
## whiteVother                   -0.29614    0.09347  -3.168  0.00155 ** 
## index_diffANAF_w1             -0.03174    0.07297  -0.435  0.66357    
## DvR                           -1.14844    0.08535 -13.456  < 2e-16 ***
## IvDR                           0.47602    0.09319   5.108 3.44e-07 ***
## whiteVother:index_diffANAF_w1  0.34837    0.14593   2.387  0.01703 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.085 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06413,    Adjusted R-squared:  0.06269 
## F-statistic: 44.74 on 5 and 3265 DF,  p-value: < 2.2e-16

b2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * whiteVother + partyID

m8.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_diffANAF_w1 + DvR + IvDR, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_diffANAF_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.7004 -1.4231  0.1391  1.7367  3.4121 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.41669    0.04728   8.814  < 2e-16 ***
## whiteVother                   -0.29614    0.09347  -3.168  0.00155 ** 
## index_diffANAF_w1             -0.03174    0.07297  -0.435  0.66357    
## DvR                           -1.14844    0.08535 -13.456  < 2e-16 ***
## IvDR                           0.47602    0.09319   5.108 3.44e-07 ***
## whiteVother:index_diffANAF_w1  0.34837    0.14593   2.387  0.01703 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.085 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06413,    Adjusted R-squared:  0.06269 
## F-statistic: 44.74 on 5 and 3265 DF,  p-value: < 2.2e-16

c1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * blackVother + partyID

m5.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_diffANAF_w1 + DvR + IvDR, data = dw)
summary(m5.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_diffANAF_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.7435 -1.4987  0.4465  1.6391  4.0064 
## 
## Coefficients:
##                                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                   -0.007848   0.070232  -0.112    0.911    
## blackVother                    1.191135   0.138073   8.627  < 2e-16 ***
## index_diffANAF_w1             -0.140910   0.092443  -1.524    0.128    
## DvR                           -1.265075   0.083749 -15.106  < 2e-16 ***
## IvDR                           0.526610   0.091734   5.741 1.03e-08 ***
## blackVother:index_diffANAF_w1 -0.074093   0.184920  -0.401    0.689    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.056 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.08929,    Adjusted R-squared:  0.08789 
## F-statistic: 64.02 on 5 and 3265 DF,  p-value: < 2.2e-16

c2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * blackVother + partyID

m6.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_diffANAF_w1 + DvR + IvDR, data = dw)
summary(m6.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_diffANAF_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.7435 -1.4987  0.4465  1.6391  4.0064 
## 
## Coefficients:
##                                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                   -0.007848   0.070232  -0.112    0.911    
## blackVother                    1.191135   0.138073   8.627  < 2e-16 ***
## index_diffANAF_w1             -0.140910   0.092443  -1.524    0.128    
## DvR                           -1.265075   0.083749 -15.106  < 2e-16 ***
## IvDR                           0.526610   0.091734   5.741 1.03e-08 ***
## blackVother:index_diffANAF_w1 -0.074093   0.184920  -0.401    0.689    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.056 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.08929,    Adjusted R-squared:  0.08789 
## F-statistic: 64.02 on 5 and 3265 DF,  p-value: < 2.2e-16

d1. vaxxAttitudes ~ (ANALYTIC - AFFECT) + education.c + partyID

m3.cc <- lm(vaxxAttitudes_w1 ~ edu.c + index_diffANAF_w1 + DvR + IvDR, data = dw)
summary(m3.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c + index_diffANAF_w1 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.4630 -1.3560  0.0718  1.7180  4.0603 
## 
## Coefficients:
##                   Estimate Std. Error t value Pr(>|t|)    
## (Intercept)        0.47062    0.04455  10.563  < 2e-16 ***
## edu.c              0.08574    0.01289   6.652 3.39e-11 ***
## index_diffANAF_w1 -0.09735    0.07039  -1.383    0.167    
## DvR               -1.00867    0.08140 -12.391  < 2e-16 ***
## IvDR               0.46552    0.09299   5.006 5.84e-07 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.08 on 3266 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06783,    Adjusted R-squared:  0.06669 
## F-statistic: 59.41 on 4 and 3266 DF,  p-value: < 2.2e-16

d2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * education.c + partyID

m4.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_diffANAF_w1 + DvR + IvDR, data = dw)
summary(m4.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_diffANAF_w1 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.5413 -1.3591  0.0614  1.7318  4.0575 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.47098    0.04456  10.571  < 2e-16 ***
## edu.c                    0.07995    0.01422   5.622 2.04e-08 ***
## index_diffANAF_w1       -0.10120    0.07051  -1.435    0.151    
## DvR                     -1.01009    0.08142 -12.406  < 2e-16 ***
## IvDR                     0.46683    0.09300   5.020 5.45e-07 ***
## edu.c:index_diffANAF_w1 -0.02406    0.02493  -0.965    0.335    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.08 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06809,    Adjusted R-squared:  0.06667 
## F-statistic: 47.71 on 5 and 3265 DF,  p-value: < 2.2e-16

ii. Wave 2

a1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * ruralVother + partyID

m7.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_diffANAF_w2 + DvR + IvDR, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_diffANAF_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8395 -1.2406  0.0124  1.9412  3.3571 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.17702    0.06260   2.828  0.00473 ** 
## ruralVother                    0.38293    0.12211   3.136  0.00173 ** 
## index_diffANAF_w2             -0.09147    0.11156  -0.820  0.41235    
## DvR                           -0.56619    0.09317  -6.077 1.42e-09 ***
## IvDR                           0.47030    0.11160   4.214 2.60e-05 ***
## ruralVother:index_diffANAF_w2  0.33516    0.22255   1.506  0.13220    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.07 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.02847,    Adjusted R-squared:  0.02647 
## F-statistic: 14.25 on 5 and 2432 DF,  p-value: 8.938e-14

a2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * ruralVother + partyID

m8.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_diffANAF_w2 + DvR + IvDR, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_diffANAF_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8395 -1.2406  0.0124  1.9412  3.3571 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.17702    0.06260   2.828  0.00473 ** 
## ruralVother                    0.38293    0.12211   3.136  0.00173 ** 
## index_diffANAF_w2             -0.09147    0.11156  -0.820  0.41235    
## DvR                           -0.56619    0.09317  -6.077 1.42e-09 ***
## IvDR                           0.47030    0.11160   4.214 2.60e-05 ***
## ruralVother:index_diffANAF_w2  0.33516    0.22255   1.506  0.13220    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.07 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.02847,    Adjusted R-squared:  0.02647 
## F-statistic: 14.25 on 5 and 2432 DF,  p-value: 8.938e-14

b1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * whiteVother + partyID

m7.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_diffANAF_w2 + DvR + IvDR, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_diffANAF_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1893 -1.2228 -0.0166  1.8926  3.6337 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.23776    0.05506   4.318 1.63e-05 ***
## whiteVother                   -0.23762    0.10851  -2.190 0.028625 *  
## index_diffANAF_w2              0.06184    0.09237   0.669 0.503266    
## DvR                           -0.71138    0.09619  -7.396 1.93e-13 ***
## IvDR                           0.43408    0.11152   3.893 0.000102 ***
## whiteVother:index_diffANAF_w2  0.48980    0.18399   2.662 0.007816 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.064 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03386,    Adjusted R-squared:  0.03187 
## F-statistic: 17.04 on 5 and 2432 DF,  p-value: < 2.2e-16

b2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * whiteVother + partyID

m8.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_diffANAF_w2 + DvR + IvDR, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_diffANAF_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1893 -1.2228 -0.0166  1.8926  3.6337 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.23776    0.05506   4.318 1.63e-05 ***
## whiteVother                   -0.23762    0.10851  -2.190 0.028625 *  
## index_diffANAF_w2              0.06184    0.09237   0.669 0.503266    
## DvR                           -0.71138    0.09619  -7.396 1.93e-13 ***
## IvDR                           0.43408    0.11152   3.893 0.000102 ***
## whiteVother:index_diffANAF_w2  0.48980    0.18399   2.662 0.007816 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.064 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03386,    Adjusted R-squared:  0.03187 
## F-statistic: 17.04 on 5 and 2432 DF,  p-value: < 2.2e-16

c1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * blackVother + partyID

m7.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_diffANAF_w2 + DvR + IvDR, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_diffANAF_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1333 -1.1392 -0.0202  1.9045  3.9939 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                   -0.09441    0.08310  -1.136    0.256    
## blackVother                    0.93619    0.16406   5.707 1.29e-08 ***
## index_diffANAF_w2              0.03658    0.11875   0.308    0.758    
## DvR                           -0.79701    0.09507  -8.384  < 2e-16 ***
## IvDR                           0.48388    0.11030   4.387 1.20e-05 ***
## blackVother:index_diffANAF_w2 -0.29415    0.23696  -1.241    0.215    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.047 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.04972,    Adjusted R-squared:  0.04777 
## F-statistic: 25.45 on 5 and 2432 DF,  p-value: < 2.2e-16

c2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * blackVother + partyID

m8.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_diffANAF_w2 + DvR + IvDR, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_diffANAF_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1333 -1.1392 -0.0202  1.9045  3.9939 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                   -0.09441    0.08310  -1.136    0.256    
## blackVother                    0.93619    0.16406   5.707 1.29e-08 ***
## index_diffANAF_w2              0.03658    0.11875   0.308    0.758    
## DvR                           -0.79701    0.09507  -8.384  < 2e-16 ***
## IvDR                           0.48388    0.11030   4.387 1.20e-05 ***
## blackVother:index_diffANAF_w2 -0.29415    0.23696  -1.241    0.215    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.047 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.04972,    Adjusted R-squared:  0.04777 
## F-statistic: 25.45 on 5 and 2432 DF,  p-value: < 2.2e-16

d1. vaxxAttitudes ~ (ANALYTIC - AFFECT) * education.c + partyID

m7.cc <- lm(vaxxAttitudes_w2 ~ edu.c * index_diffANAF_w2 + DvR + IvDR, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c * index_diffANAF_w2 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9963 -1.2568  0.0562  1.8933  3.9318 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.26926    0.05160   5.218 1.96e-07 ***
## edu.c                    0.07924    0.01772   4.472 8.11e-06 ***
## index_diffANAF_w2       -0.01047    0.08985  -0.117   0.9072    
## DvR                     -0.59322    0.09244  -6.418 1.66e-10 ***
## IvDR                     0.46000    0.11133   4.132 3.72e-05 ***
## edu.c:index_diffANAF_w2  0.05779    0.03208   1.801   0.0718 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.066 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03249,    Adjusted R-squared:  0.0305 
## F-statistic: 16.33 on 5 and 2432 DF,  p-value: 7.02e-16

d2. vaxxAttitudes ~ (ANALYTIC - AFFECT) * education.c + partyID

m8.cc <- lm(vaxxAttitudes_w2 ~ edu.c * index_diffANAF_w2 + DvR + IvDR, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c * index_diffANAF_w2 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.9963 -1.2568  0.0562  1.8933  3.9318 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.26926    0.05160   5.218 1.96e-07 ***
## edu.c                    0.07924    0.01772   4.472 8.11e-06 ***
## index_diffANAF_w2       -0.01047    0.08985  -0.117   0.9072    
## DvR                     -0.59322    0.09244  -6.418 1.66e-10 ***
## IvDR                     0.46000    0.11133   4.132 3.72e-05 ***
## edu.c:index_diffANAF_w2  0.05779    0.03208   1.801   0.0718 .  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.066 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.03249,    Adjusted R-squared:  0.0305 
## F-statistic: 16.33 on 5 and 2432 DF,  p-value: 7.02e-16

iii. Wave 3

a1. vaxxBehavior ~ (ANALYTIC - AFFECT) * ruralVother + partyID

m7.cc <- lm(vaxxBehavior ~ ruralVother * index_diffANAF_w3 + DvR + IvDR, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_diffANAF_w3 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6728 -0.6197  0.3622  0.8159  1.6948 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.03336    0.05144  58.967  < 2e-16 ***
## ruralVother                    0.44511    0.10020   4.442 9.92e-06 ***
## index_diffANAF_w3             -0.28705    0.10703  -2.682  0.00744 ** 
## DvR                           -0.67257    0.07814  -8.608  < 2e-16 ***
## IvDR                           0.10713    0.09504   1.127  0.25993    
## ruralVother:index_diffANAF_w3  0.48273    0.21322   2.264  0.02379 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.113 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.0995, Adjusted R-squared:  0.09495 
## F-statistic: 21.88 on 5 and 990 DF,  p-value: < 2.2e-16

a2. vaxxBehavior ~ (ANALYTIC - AFFECT) * ruralVother + partyID

m8.cc <- lm(vaxxBehavior ~ ruralVother * index_diffANAF_w3 + DvR + IvDR, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_diffANAF_w3 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6728 -0.6197  0.3622  0.8159  1.6948 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.03336    0.05144  58.967  < 2e-16 ***
## ruralVother                    0.44511    0.10020   4.442 9.92e-06 ***
## index_diffANAF_w3             -0.28705    0.10703  -2.682  0.00744 ** 
## DvR                           -0.67257    0.07814  -8.608  < 2e-16 ***
## IvDR                           0.10713    0.09504   1.127  0.25993    
## ruralVother:index_diffANAF_w3  0.48273    0.21322   2.264  0.02379 *  
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.113 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.0995, Adjusted R-squared:  0.09495 
## F-statistic: 21.88 on 5 and 990 DF,  p-value: < 2.2e-16

b1. vaxxBehavior ~ (ANALYTIC - AFFECT) * whiteVother + partyID

m7.cc <- lm(vaxxBehavior ~ whiteVother * index_diffANAF_w3 + DvR + IvDR, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_diffANAF_w3 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6984 -0.5339  0.3871  0.8701  1.3934 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.17564    0.04715  67.349   <2e-16 ***
## whiteVother                    0.08257    0.09209   0.897    0.370    
## index_diffANAF_w3             -0.11724    0.09564  -1.226    0.221    
## DvR                           -0.69103    0.08149  -8.480   <2e-16 ***
## IvDR                           0.12988    0.09643   1.347    0.178    
## whiteVother:index_diffANAF_w3  0.12076    0.19106   0.632    0.528    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.124 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08236,    Adjusted R-squared:  0.07772 
## F-statistic: 17.77 on 5 and 990 DF,  p-value: < 2.2e-16

b2. vaxxBehavior ~ (ANALYTIC - AFFECT) * whiteVother + partyID

m8.cc <- lm(vaxxBehavior ~ whiteVother * index_diffANAF_w3 + DvR + IvDR, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_diffANAF_w3 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6984 -0.5339  0.3871  0.8701  1.3934 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.17564    0.04715  67.349   <2e-16 ***
## whiteVother                    0.08257    0.09209   0.897    0.370    
## index_diffANAF_w3             -0.11724    0.09564  -1.226    0.221    
## DvR                           -0.69103    0.08149  -8.480   <2e-16 ***
## IvDR                           0.12988    0.09643   1.347    0.178    
## whiteVother:index_diffANAF_w3  0.12076    0.19106   0.632    0.528    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.124 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08236,    Adjusted R-squared:  0.07772 
## F-statistic: 17.77 on 5 and 990 DF,  p-value: < 2.2e-16

c1. vaxxBehavior ~ (ANALYTIC - AFFECT) * blackVother + partyID

m7.cc <- lm(vaxxBehavior ~ blackVother * index_diffANAF_w3 + DvR + IvDR, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_diffANAF_w3 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7094 -0.5269  0.3734  0.8802  1.6509 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.05555    0.06920  44.152   <2e-16 ***
## blackVother                    0.26108    0.13648   1.913   0.0560 .  
## index_diffANAF_w3             -0.20521    0.12346  -1.662   0.0968 .  
## DvR                           -0.73765    0.08064  -9.147   <2e-16 ***
## IvDR                           0.12250    0.09574   1.280   0.2010    
## blackVother:index_diffANAF_w3  0.17978    0.24648   0.729   0.4660    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.122 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08499,    Adjusted R-squared:  0.08037 
## F-statistic: 18.39 on 5 and 990 DF,  p-value: < 2.2e-16

c2. vaxxBehavior ~ (ANALYTIC - AFFECT) * blackVother + partyID

m8.cc <- lm(vaxxBehavior ~ blackVother * index_diffANAF_w3 + DvR + IvDR, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_diffANAF_w3 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7094 -0.5269  0.3734  0.8802  1.6509 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.05555    0.06920  44.152   <2e-16 ***
## blackVother                    0.26108    0.13648   1.913   0.0560 .  
## index_diffANAF_w3             -0.20521    0.12346  -1.662   0.0968 .  
## DvR                           -0.73765    0.08064  -9.147   <2e-16 ***
## IvDR                           0.12250    0.09574   1.280   0.2010    
## blackVother:index_diffANAF_w3  0.17978    0.24648   0.729   0.4660    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.122 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08499,    Adjusted R-squared:  0.08037 
## F-statistic: 18.39 on 5 and 990 DF,  p-value: < 2.2e-16

d1. vaxxBehavior ~ (ANALYTIC - AFFECT) * education.c + partyID

m7.cc <- lm(vaxxBehavior ~ edu.c * index_diffANAF_w3 + DvR + IvDR, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_diffANAF_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7768 -0.4495  0.3363  0.8445  1.9074 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              3.13981    0.04339  72.366  < 2e-16 ***
## edu.c                    0.05488    0.01526   3.595  0.00034 ***
## index_diffANAF_w3       -0.14908    0.08897  -1.676  0.09413 .  
## DvR                     -0.70638    0.07786  -9.073  < 2e-16 ***
## IvDR                     0.11348    0.09508   1.193  0.23299    
## edu.c:index_diffANAF_w3 -0.01319    0.03345  -0.394  0.69353    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.114 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09827,    Adjusted R-squared:  0.09372 
## F-statistic: 21.58 on 5 and 990 DF,  p-value: < 2.2e-16

d2. vaxxBehavior ~ (ANALYTIC - AFFECT) * education.c + partyID

m8.cc <- lm(vaxxBehavior ~ edu.c * index_diffANAF_w3 + DvR + IvDR, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_diffANAF_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7768 -0.4495  0.3363  0.8445  1.9074 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              3.13981    0.04339  72.366  < 2e-16 ***
## edu.c                    0.05488    0.01526   3.595  0.00034 ***
## index_diffANAF_w3       -0.14908    0.08897  -1.676  0.09413 .  
## DvR                     -0.70638    0.07786  -9.073  < 2e-16 ***
## IvDR                     0.11348    0.09508   1.193  0.23299    
## edu.c:index_diffANAF_w3 -0.01319    0.03345  -0.394  0.69353    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.114 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09827,    Adjusted R-squared:  0.09372 
## F-statistic: 21.58 on 5 and 990 DF,  p-value: < 2.2e-16

E. Analytic - Threat

i. Wave 1 (excluding partyID)

a1. vaxxAttitudes ~ (ANALYTIC - THREAT) * ruralVother

m7.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_diffANTR_w1, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_diffANTR_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1293 -1.5831  0.2836  2.0705  3.3260 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.50219    0.04660  10.776  < 2e-16 ***
## ruralVother                    0.42846    0.09321   4.597 4.45e-06 ***
## index_diffANTR_w1              0.98457    0.25661   3.837 0.000127 ***
## ruralVother:index_diffANTR_w1 -0.24434    0.51323  -0.476 0.634050    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.138 on 3277 degrees of freedom
## Multiple R-squared:  0.01351,    Adjusted R-squared:  0.01261 
## F-statistic: 14.96 on 3 and 3277 DF,  p-value: 1.13e-09

a2. vaxxAttitudes ~ (ANALYTIC - THREAT) * ruralVother

m8.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_diffANTR_w1, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_diffANTR_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1293 -1.5831  0.2836  2.0705  3.3260 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.50219    0.04660  10.776  < 2e-16 ***
## ruralVother                    0.42846    0.09321   4.597 4.45e-06 ***
## index_diffANTR_w1              0.98457    0.25661   3.837 0.000127 ***
## ruralVother:index_diffANTR_w1 -0.24434    0.51323  -0.476 0.634050    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.138 on 3277 degrees of freedom
## Multiple R-squared:  0.01351,    Adjusted R-squared:  0.01261 
## F-statistic: 14.96 on 3 and 3277 DF,  p-value: 1.13e-09

b1. vaxxAttitudes ~ (ANALYTIC - THREAT) * whiteVother

m9.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_diffANTR_w1, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_diffANTR_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1075 -1.5564  0.3598  2.1089  3.0249 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.60593    0.03977  15.236  < 2e-16 ***
## whiteVother                   -0.13244    0.07954  -1.665    0.096 .  
## index_diffANTR_w1              0.94248    0.21400   4.404  1.1e-05 ***
## whiteVother:index_diffANTR_w1 -0.07977    0.42801  -0.186    0.852    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.144 on 3277 degrees of freedom
## Multiple R-squared:  0.007598,   Adjusted R-squared:  0.006689 
## F-statistic: 8.363 on 3 and 3277 DF,  p-value: 1.547e-05

b2. vaxxAttitudes ~ (ANALYTIC - THREAT) * whiteVother

m10.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_diffANTR_w1, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_diffANTR_w1, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1075 -1.5564  0.3598  2.1089  3.0249 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.60593    0.03977  15.236  < 2e-16 ***
## whiteVother                   -0.13244    0.07954  -1.665    0.096 .  
## index_diffANTR_w1              0.94248    0.21400   4.404  1.1e-05 ***
## whiteVother:index_diffANTR_w1 -0.07977    0.42801  -0.186    0.852    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.144 on 3277 degrees of freedom
## Multiple R-squared:  0.007598,   Adjusted R-squared:  0.006689 
## F-statistic: 8.363 on 3 and 3277 DF,  p-value: 1.547e-05

c1. vaxxAttitudes ~ (ANALYTIC - THREAT) * blackVother

m7.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_diffANTR_w1, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_diffANTR_w1, 
##     data = dw)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
## -4.213 -1.630  0.276  2.038  3.220 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.36618    0.05469   6.695 2.52e-11 ***
## blackVother                    0.71557    0.10938   6.542 7.02e-11 ***
## index_diffANTR_w1              0.78444    0.28782   2.725  0.00646 ** 
## blackVother:index_diffANTR_w1  0.47581    0.57565   0.827  0.40854    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.131 on 3277 degrees of freedom
## Multiple R-squared:  0.01961,    Adjusted R-squared:  0.01872 
## F-statistic: 21.85 on 3 and 3277 DF,  p-value: 5.221e-14

c2. vaxxAttitudes ~ (ANALYTIC - THREAT) * blackVother

m8.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_diffANTR_w1, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_diffANTR_w1, 
##     data = dw)
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
## -4.213 -1.630  0.276  2.038  3.220 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.36618    0.05469   6.695 2.52e-11 ***
## blackVother                    0.71557    0.10938   6.542 7.02e-11 ***
## index_diffANTR_w1              0.78444    0.28782   2.725  0.00646 ** 
## blackVother:index_diffANTR_w1  0.47581    0.57565   0.827  0.40854    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.131 on 3277 degrees of freedom
## Multiple R-squared:  0.01961,    Adjusted R-squared:  0.01872 
## F-statistic: 21.85 on 3 and 3277 DF,  p-value: 5.221e-14

d1. vaxxAttitudes ~ (ANALYTIC - THREAT) * education.c

m7.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_diffANTR_w1, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_diffANTR_w1, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.2044 -1.5070  0.2862  2.0292  3.7292 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.62774    0.03743  16.770  < 2e-16 ***
## edu.c                    0.08608    0.01318   6.533 7.45e-11 ***
## index_diffANTR_w1        0.86436    0.20035   4.314 1.65e-05 ***
## edu.c:index_diffANTR_w1 -0.03617    0.07502  -0.482     0.63    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.131 on 3277 degrees of freedom
## Multiple R-squared:  0.01959,    Adjusted R-squared:  0.01869 
## F-statistic: 21.83 on 3 and 3277 DF,  p-value: 5.414e-14

d2. vaxxAttitudes ~ (ANALYTIC - THREAT) * education.c

m8.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_diffANTR_w1, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_diffANTR_w1, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.2044 -1.5070  0.2862  2.0292  3.7292 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.62774    0.03743  16.770  < 2e-16 ***
## edu.c                    0.08608    0.01318   6.533 7.45e-11 ***
## index_diffANTR_w1        0.86436    0.20035   4.314 1.65e-05 ***
## edu.c:index_diffANTR_w1 -0.03617    0.07502  -0.482     0.63    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.131 on 3277 degrees of freedom
## Multiple R-squared:  0.01959,    Adjusted R-squared:  0.01869 
## F-statistic: 21.83 on 3 and 3277 DF,  p-value: 5.414e-14

ii. Wave 2 (excluding partyID)

a1. vaxxAttitudes ~ (ANALYTIC - THREAT) * ruralVother

m9.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_diffANTR_w2, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_diffANTR_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.6495 -1.4376 -0.1005  1.8686  3.0666 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.27485    0.05241   5.244 1.71e-07 ***
## ruralVother                    0.38111    0.10483   3.636 0.000283 ***
## index_diffANTR_w2              0.05046    0.32329   0.156 0.875983    
## ruralVother:index_diffANTR_w2  0.67949    0.64658   1.051 0.293413    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.005953,   Adjusted R-squared:  0.004732 
## F-statistic: 4.873 on 3 and 2441 DF,  p-value: 0.002215

a2. vaxxAttitudes ~ (ANALYTIC - THREAT) * ruralVother

m10.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_diffANTR_w2, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_diffANTR_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.6495 -1.4376 -0.1005  1.8686  3.0666 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.27485    0.05241   5.244 1.71e-07 ***
## ruralVother                    0.38111    0.10483   3.636 0.000283 ***
## index_diffANTR_w2              0.05046    0.32329   0.156 0.875983    
## ruralVother:index_diffANTR_w2  0.67949    0.64658   1.051 0.293413    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.005953,   Adjusted R-squared:  0.004732 
## F-statistic: 4.873 on 3 and 2441 DF,  p-value: 0.002215

b1. vaxxAttitudes ~ (ANALYTIC - THREAT) * whiteVother

m9.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_diffANTR_w2, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_diffANTR_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8420 -1.4200 -0.1832  1.7270  3.5025 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.35301    0.04603   7.669 2.49e-14 ***
## whiteVother                   -0.17817    0.09207  -1.935  0.05307 .  
## index_diffANTR_w2              0.49151    0.27475   1.789  0.07375 .  
## whiteVother:index_diffANTR_w2  1.46730    0.54950   2.670  0.00763 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.005429,   Adjusted R-squared:  0.004206 
## F-statistic: 4.441 on 3 and 2441 DF,  p-value: 0.00405

b2. vaxxAttitudes ~ (ANALYTIC - THREAT) * whiteVother

m10.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_diffANTR_w2, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_diffANTR_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.8420 -1.4200 -0.1832  1.7270  3.5025 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.35301    0.04603   7.669 2.49e-14 ***
## whiteVother                   -0.17817    0.09207  -1.935  0.05307 .  
## index_diffANTR_w2              0.49151    0.27475   1.789  0.07375 .  
## whiteVother:index_diffANTR_w2  1.46730    0.54950   2.670  0.00763 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.091 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.005429,   Adjusted R-squared:  0.004206 
## F-statistic: 4.441 on 3 and 2441 DF,  p-value: 0.00405

c1. vaxxAttitudes ~ (ANALYTIC - THREAT) * blackVother

m9.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_diffANTR_w2, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_diffANTR_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.4868 -1.4662  0.1083  1.5398  3.5432 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.12794    0.06605   1.937   0.0529 .  
## blackVother                    0.68142    0.13209   5.159 2.69e-07 ***
## index_diffANTR_w2              0.57923    0.39018   1.484   0.1378    
## blackVother:index_diffANTR_w2 -1.07452    0.78036  -1.377   0.1687    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.083 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.01368,    Adjusted R-squared:  0.01247 
## F-statistic: 11.29 on 3 and 2441 DF,  p-value: 2.367e-07

c2. vaxxAttitudes ~ (ANALYTIC - THREAT) * blackVother

m10.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_diffANTR_w2, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_diffANTR_w2, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.4868 -1.4662  0.1083  1.5398  3.5432 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.12794    0.06605   1.937   0.0529 .  
## blackVother                    0.68142    0.13209   5.159 2.69e-07 ***
## index_diffANTR_w2              0.57923    0.39018   1.484   0.1378    
## blackVother:index_diffANTR_w2 -1.07452    0.78036  -1.377   0.1687    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.083 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.01368,    Adjusted R-squared:  0.01247 
## F-statistic: 11.29 on 3 and 2441 DF,  p-value: 2.367e-07

d1. vaxxAttitudes ~ (ANALYTIC - THREAT) * education.c

m9.cc <- lm(vaxxAttitudes_w2 ~ edu.c * index_diffANTR_w2, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c * index_diffANTR_w2, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.7155 -1.4529 -0.2027  1.7279  3.5752 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.36549    0.04289   8.522  < 2e-16 ***
## edu.c                    0.06989    0.01656   4.221 2.52e-05 ***
## index_diffANTR_w2        0.12972    0.25822   0.502    0.615    
## edu.c:index_diffANTR_w2  0.10151    0.10452   0.971    0.332    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.089 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.007648,   Adjusted R-squared:  0.006428 
## F-statistic: 6.271 on 3 and 2441 DF,  p-value: 0.0003089

d2. vaxxAttitudes ~ (ANALYTIC - THREAT) * education.c

m10.cc <- lm(vaxxAttitudes_w2 ~ edu.c * index_diffANTR_w2, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c * index_diffANTR_w2, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -3.7155 -1.4529 -0.2027  1.7279  3.5752 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.36549    0.04289   8.522  < 2e-16 ***
## edu.c                    0.06989    0.01656   4.221 2.52e-05 ***
## index_diffANTR_w2        0.12972    0.25822   0.502    0.615    
## edu.c:index_diffANTR_w2  0.10151    0.10452   0.971    0.332    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.089 on 2441 degrees of freedom
##   (836 observations deleted due to missingness)
## Multiple R-squared:  0.007648,   Adjusted R-squared:  0.006428 
## F-statistic: 6.271 on 3 and 2441 DF,  p-value: 0.0003089

iii. Wave 3 (excluding partyID)

a1. vaxxBehavior ~ (ANALYTIC - THREAT) * ruralVother

m9.cc <- lm(vaxxBehavior ~ ruralVother * index_diffANTR_w3, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_diffANTR_w3, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3913 -0.3308  0.6613  0.6812  1.4057 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                     3.1173     0.0453  68.816  < 2e-16 ***
## ruralVother                     0.4271     0.0906   4.715 2.77e-06 ***
## index_diffANTR_w3              -0.3018     0.3251  -0.928    0.353    
## ruralVother:index_diffANTR_w3   0.8741     0.6502   1.344    0.179    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.158 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.02198,    Adjusted R-squared:  0.01904 
## F-statistic: 7.455 on 3 and 995 DF,  p-value: 6.13e-05

a2. vaxxBehavior ~ (ANALYTIC - THREAT) * ruralVother

m10.cc <- lm(vaxxBehavior ~ ruralVother * index_diffANTR_w3, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_diffANTR_w3, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3913 -0.3308  0.6613  0.6812  1.4057 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                     3.1173     0.0453  68.816  < 2e-16 ***
## ruralVother                     0.4271     0.0906   4.715 2.77e-06 ***
## index_diffANTR_w3              -0.3018     0.3251  -0.928    0.353    
## ruralVother:index_diffANTR_w3   0.8741     0.6502   1.344    0.179    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.158 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.02198,    Adjusted R-squared:  0.01904 
## F-statistic: 7.455 on 3 and 995 DF,  p-value: 6.13e-05

b1. vaxxBehavior ~ (ANALYTIC - THREAT) * whiteVother

m9.cc <- lm(vaxxBehavior ~ whiteVother * index_diffANTR_w3, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_diffANTR_w3, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.4401 -0.1825  0.5987  0.8247  0.8556 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.28993    0.04165  78.999  < 2e-16 ***
## whiteVother                    0.22923    0.08329   2.752  0.00603 ** 
## index_diffANTR_w3             -0.04473    0.31374  -0.143  0.88667    
## whiteVother:index_diffANTR_w3 -0.18050    0.62747  -0.288  0.77366    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.166 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.008168,   Adjusted R-squared:  0.005178 
## F-statistic: 2.732 on 3 and 995 DF,  p-value: 0.04272

b2. vaxxBehavior ~ (ANALYTIC - THREAT) * whiteVother

m10.cc <- lm(vaxxBehavior ~ whiteVother * index_diffANTR_w3, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_diffANTR_w3, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.4401 -0.1825  0.5987  0.8247  0.8556 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.28993    0.04165  78.999  < 2e-16 ***
## whiteVother                    0.22923    0.08329   2.752  0.00603 ** 
## index_diffANTR_w3             -0.04473    0.31374  -0.143  0.88667    
## whiteVother:index_diffANTR_w3 -0.18050    0.62747  -0.288  0.77366    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.166 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.008168,   Adjusted R-squared:  0.005178 
## F-statistic: 2.732 on 3 and 995 DF,  p-value: 0.04272

c1. vaxxBehavior ~ (ANALYTIC - THREAT) * blackVother

m9.cc <- lm(vaxxBehavior ~ blackVother * index_diffANTR_w3, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_diffANTR_w3, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3573 -0.2365  0.7598  0.7658  0.8358 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.25694    0.06171  52.780   <2e-16 ***
## blackVother                   -0.04367    0.12342  -0.354    0.724    
## index_diffANTR_w3             -0.12966    0.42230  -0.307    0.759    
## blackVother:index_diffANTR_w3  0.33784    0.84460   0.400    0.689    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.171 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.0003758,  Adjusted R-squared:  -0.002638 
## F-statistic: 0.1247 on 3 and 995 DF,  p-value: 0.9455

c2. vaxxBehavior ~ (ANALYTIC - THREAT) * blackVother

m10.cc <- lm(vaxxBehavior ~ blackVother * index_diffANTR_w3, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_diffANTR_w3, 
##     data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3573 -0.2365  0.7598  0.7658  0.8358 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.25694    0.06171  52.780   <2e-16 ***
## blackVother                   -0.04367    0.12342  -0.354    0.724    
## index_diffANTR_w3             -0.12966    0.42230  -0.307    0.759    
## blackVother:index_diffANTR_w3  0.33784    0.84460   0.400    0.689    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.171 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.0003758,  Adjusted R-squared:  -0.002638 
## F-statistic: 0.1247 on 3 and 995 DF,  p-value: 0.9455

d1. vaxxBehavior ~ (ANALYTIC - THREAT) * education.c

m9.cc <- lm(vaxxBehavior ~ edu.c * index_diffANTR_w3, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_diffANTR_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3768 -0.3162  0.6319  0.7323  1.5813 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              3.21694    0.03779  85.132  < 2e-16 ***
## edu.c                    0.05912    0.01458   4.055 5.41e-05 ***
## index_diffANTR_w3       -0.10750    0.27217  -0.395    0.693    
## edu.c:index_diffANTR_w3  0.07356    0.11087   0.663    0.507    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.161 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.01641,    Adjusted R-squared:  0.01345 
## F-statistic: 5.534 on 3 and 995 DF,  p-value: 0.0009062

d2. vaxxBehavior ~ (ANALYTIC - THREAT) * education.c

m10.cc <- lm(vaxxBehavior ~ edu.c * index_diffANTR_w3, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_diffANTR_w3, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.3768 -0.3162  0.6319  0.7323  1.5813 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              3.21694    0.03779  85.132  < 2e-16 ***
## edu.c                    0.05912    0.01458   4.055 5.41e-05 ***
## index_diffANTR_w3       -0.10750    0.27217  -0.395    0.693    
## edu.c:index_diffANTR_w3  0.07356    0.11087   0.663    0.507    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.161 on 995 degrees of freedom
##   (2282 observations deleted due to missingness)
## Multiple R-squared:  0.01641,    Adjusted R-squared:  0.01345 
## F-statistic: 5.534 on 3 and 995 DF,  p-value: 0.0009062

i. Wave 1

a1. vaxxAttitudes ~ (ANALYTIC - THREAT) * ruralVother + partyID

m7.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_diffANTR_w1 + DvR + IvDR, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_diffANTR_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.3977 -1.3015  0.0763  1.7868  3.4890 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.42333    0.04714   8.980  < 2e-16 ***
## ruralVother                    0.28977    0.09180   3.156  0.00161 ** 
## index_diffANTR_w1              0.63389    0.25288   2.507  0.01223 *  
## DvR                           -0.94165    0.08369 -11.252  < 2e-16 ***
## IvDR                           0.50906    0.09299   5.474 4.73e-08 ***
## ruralVother:index_diffANTR_w1 -0.40733    0.50181  -0.812  0.41701    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.089 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06022,    Adjusted R-squared:  0.05878 
## F-statistic: 41.85 on 5 and 3265 DF,  p-value: < 2.2e-16

a2. vaxxAttitudes ~ (ANALYTIC - THREAT) * ruralVother + partyID

m8.cc <- lm(vaxxAttitudes_w1 ~ ruralVother * index_diffANTR_w1 + DvR + IvDR, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ ruralVother * index_diffANTR_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.3977 -1.3015  0.0763  1.7868  3.4890 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.42333    0.04714   8.980  < 2e-16 ***
## ruralVother                    0.28977    0.09180   3.156  0.00161 ** 
## index_diffANTR_w1              0.63389    0.25288   2.507  0.01223 *  
## DvR                           -0.94165    0.08369 -11.252  < 2e-16 ***
## IvDR                           0.50906    0.09299   5.474 4.73e-08 ***
## ruralVother:index_diffANTR_w1 -0.40733    0.50181  -0.812  0.41701    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.089 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06022,    Adjusted R-squared:  0.05878 
## F-statistic: 41.85 on 5 and 3265 DF,  p-value: < 2.2e-16

b1. vaxxAttitudes ~ (ANALYTIC - THREAT) * whiteVother + partyID

m9.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_diffANTR_w1 + DvR + IvDR, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_diffANTR_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.5495 -1.3750  0.1576  1.7264  3.4317 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.43582    0.04134  10.543  < 2e-16 ***
## whiteVother                   -0.40040    0.08098  -4.945 8.01e-07 ***
## index_diffANTR_w1              0.51017    0.21093   2.419   0.0156 *  
## DvR                           -1.09630    0.08667 -12.649  < 2e-16 ***
## IvDR                           0.48343    0.09302   5.197 2.15e-07 ***
## whiteVother:index_diffANTR_w1  0.09149    0.41744   0.219   0.8265    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.085 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06394,    Adjusted R-squared:  0.06251 
## F-statistic: 44.61 on 5 and 3265 DF,  p-value: < 2.2e-16

b2. vaxxAttitudes ~ (ANALYTIC - THREAT) * whiteVother + partyID

m10.cc <- lm(vaxxAttitudes_w1 ~ whiteVother * index_diffANTR_w1 + DvR + IvDR, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ whiteVother * index_diffANTR_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.5495 -1.3750  0.1576  1.7264  3.4317 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.43582    0.04134  10.543  < 2e-16 ***
## whiteVother                   -0.40040    0.08098  -4.945 8.01e-07 ***
## index_diffANTR_w1              0.51017    0.21093   2.419   0.0156 *  
## DvR                           -1.09630    0.08667 -12.649  < 2e-16 ***
## IvDR                           0.48343    0.09302   5.197 2.15e-07 ***
## whiteVother:index_diffANTR_w1  0.09149    0.41744   0.219   0.8265    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.085 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06394,    Adjusted R-squared:  0.06251 
## F-statistic: 44.61 on 5 and 3265 DF,  p-value: < 2.2e-16

c1. vaxxAttitudes ~ (ANALYTIC - THREAT) * blackVother + partyID

m7.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_diffANTR_w1 + DvR + IvDR, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_diffANTR_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.6276 -1.4648  0.4509  1.6301  4.0896 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.05504    0.05685   0.968    0.333    
## blackVother                    1.18197    0.11021  10.725  < 2e-16 ***
## index_diffANTR_w1              0.41068    0.27985   1.467    0.142    
## DvR                           -1.22216    0.08523 -14.340  < 2e-16 ***
## IvDR                           0.54148    0.09156   5.914 3.68e-09 ***
## blackVother:index_diffANTR_w1  0.04410    0.55851   0.079    0.937    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.057 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.08902,    Adjusted R-squared:  0.08762 
## F-statistic: 63.81 on 5 and 3265 DF,  p-value: < 2.2e-16

c2. vaxxAttitudes ~ (ANALYTIC - THREAT) * blackVother + partyID

m8.cc <- lm(vaxxAttitudes_w1 ~ blackVother * index_diffANTR_w1 + DvR + IvDR, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ blackVother * index_diffANTR_w1 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.6276 -1.4648  0.4509  1.6301  4.0896 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.05504    0.05685   0.968    0.333    
## blackVother                    1.18197    0.11021  10.725  < 2e-16 ***
## index_diffANTR_w1              0.41068    0.27985   1.467    0.142    
## DvR                           -1.22216    0.08523 -14.340  < 2e-16 ***
## IvDR                           0.54148    0.09156   5.914 3.68e-09 ***
## blackVother:index_diffANTR_w1  0.04410    0.55851   0.079    0.937    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.057 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.08902,    Adjusted R-squared:  0.08762 
## F-statistic: 63.81 on 5 and 3265 DF,  p-value: < 2.2e-16

d1. vaxxAttitudes ~ (ANALYTIC - THREAT) * education.c + partyID

m7.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_diffANTR_w1 + DvR + IvDR, data = dw)
summary(m7.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_diffANTR_w1 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.5279 -1.3778  0.1395  1.7038  3.9852 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.51023    0.03894  13.104  < 2e-16 ***
## edu.c                    0.08280    0.01290   6.420 1.56e-10 ***
## index_diffANTR_w1        0.44007    0.19890   2.213    0.027 *  
## DvR                     -0.97633    0.08273 -11.801  < 2e-16 ***
## IvDR                     0.47686    0.09273   5.143 2.87e-07 ***
## edu.c:index_diffANTR_w1 -0.03955    0.07323  -0.540    0.589    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.079 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06872,    Adjusted R-squared:  0.06729 
## F-statistic: 48.18 on 5 and 3265 DF,  p-value: < 2.2e-16

d2. vaxxAttitudes ~ (ANALYTIC - THREAT) * education.c + partyID

m8.cc <- lm(vaxxAttitudes_w1 ~ edu.c * index_diffANTR_w1 + DvR + IvDR, data = dw)
summary(m8.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w1 ~ edu.c * index_diffANTR_w1 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.5279 -1.3778  0.1395  1.7038  3.9852 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.51023    0.03894  13.104  < 2e-16 ***
## edu.c                    0.08280    0.01290   6.420 1.56e-10 ***
## index_diffANTR_w1        0.44007    0.19890   2.213    0.027 *  
## DvR                     -0.97633    0.08273 -11.801  < 2e-16 ***
## IvDR                     0.47686    0.09273   5.143 2.87e-07 ***
## edu.c:index_diffANTR_w1 -0.03955    0.07323  -0.540    0.589    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.079 on 3265 degrees of freedom
##   (10 observations deleted due to missingness)
## Multiple R-squared:  0.06872,    Adjusted R-squared:  0.06729 
## F-statistic: 48.18 on 5 and 3265 DF,  p-value: < 2.2e-16

ii. Wave 2

a1. vaxxAttitudes ~ (ANALYTIC - THREAT) * ruralVother + partyID

m9.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_diffANTR_w2 + DvR + IvDR, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_diffANTR_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0385 -1.2566  0.0472  1.9295  3.3279 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.20747    0.05445   3.810 0.000142 ***
## ruralVother                    0.29979    0.10444   2.870 0.004135 ** 
## index_diffANTR_w2              0.16354    0.32038   0.510 0.609784    
## DvR                           -0.57144    0.09307  -6.140 9.61e-10 ***
## IvDR                           0.47503    0.11124   4.270 2.03e-05 ***
## ruralVother:index_diffANTR_w2  0.68430    0.64025   1.069 0.285262    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.07 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.02889,    Adjusted R-squared:  0.02689 
## F-statistic: 14.47 on 5 and 2432 DF,  p-value: 5.423e-14

a2. vaxxAttitudes ~ (ANALYTIC - THREAT) * ruralVother + partyID

m10.cc <- lm(vaxxAttitudes_w2 ~ ruralVother * index_diffANTR_w2 + DvR + IvDR, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ ruralVother * index_diffANTR_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0385 -1.2566  0.0472  1.9295  3.3279 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.20747    0.05445   3.810 0.000142 ***
## ruralVother                    0.29979    0.10444   2.870 0.004135 ** 
## index_diffANTR_w2              0.16354    0.32038   0.510 0.609784    
## DvR                           -0.57144    0.09307  -6.140 9.61e-10 ***
## IvDR                           0.47503    0.11124   4.270 2.03e-05 ***
## ruralVother:index_diffANTR_w2  0.68430    0.64025   1.069 0.285262    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.07 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.02889,    Adjusted R-squared:  0.02689 
## F-statistic: 14.47 on 5 and 2432 DF,  p-value: 5.423e-14

b1. vaxxAttitudes ~ (ANALYTIC - THREAT) * whiteVother + partyID

m9.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_diffANTR_w2 + DvR + IvDR, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_diffANTR_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1803 -1.2011  0.0106  1.8402  4.0713 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.22926    0.04890   4.689 2.90e-06 ***
## whiteVother                   -0.34720    0.09496  -3.656 0.000262 ***
## index_diffANTR_w2              0.61076    0.27174   2.248 0.024691 *  
## DvR                           -0.70686    0.09608  -7.357 2.55e-13 ***
## IvDR                           0.44955    0.11110   4.046 5.37e-05 ***
## whiteVother:index_diffANTR_w2  1.41853    0.54262   2.614 0.008999 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.064 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.0345, Adjusted R-squared:  0.03252 
## F-statistic: 17.38 on 5 and 2432 DF,  p-value: < 2.2e-16

b2. vaxxAttitudes ~ (ANALYTIC - THREAT) * whiteVother + partyID

m10.cc <- lm(vaxxAttitudes_w2 ~ whiteVother * index_diffANTR_w2 + DvR + IvDR, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ whiteVother * index_diffANTR_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1803 -1.2011  0.0106  1.8402  4.0713 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    0.22926    0.04890   4.689 2.90e-06 ***
## whiteVother                   -0.34720    0.09496  -3.656 0.000262 ***
## index_diffANTR_w2              0.61076    0.27174   2.248 0.024691 *  
## DvR                           -0.70686    0.09608  -7.357 2.55e-13 ***
## IvDR                           0.44955    0.11110   4.046 5.37e-05 ***
## whiteVother:index_diffANTR_w2  1.41853    0.54262   2.614 0.008999 ** 
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.064 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.0345, Adjusted R-squared:  0.03252 
## F-statistic: 17.38 on 5 and 2432 DF,  p-value: < 2.2e-16

c1. vaxxAttitudes ~ (ANALYTIC - THREAT) * blackVother + partyID

m9.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_diffANTR_w2 + DvR + IvDR, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_diffANTR_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0381 -1.1603 -0.0249  1.8742  4.0958 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                   -0.09658    0.06965  -1.387   0.1657    
## blackVother                    1.00197    0.13534   7.403 1.82e-13 ***
## index_diffANTR_w2              0.71168    0.38456   1.851   0.0643 .  
## DvR                           -0.80399    0.09506  -8.458  < 2e-16 ***
## IvDR                           0.49753    0.10997   4.524 6.35e-06 ***
## blackVother:index_diffANTR_w2 -1.09185    0.76842  -1.421   0.1555    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.047 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.05028,    Adjusted R-squared:  0.04833 
## F-statistic: 25.75 on 5 and 2432 DF,  p-value: < 2.2e-16

c2. vaxxAttitudes ~ (ANALYTIC - THREAT) * blackVother + partyID

m10.cc <- lm(vaxxAttitudes_w2 ~ blackVother * index_diffANTR_w2 + DvR + IvDR, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ blackVother * index_diffANTR_w2 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.0381 -1.1603 -0.0249  1.8742  4.0958 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                   -0.09658    0.06965  -1.387   0.1657    
## blackVother                    1.00197    0.13534   7.403 1.82e-13 ***
## index_diffANTR_w2              0.71168    0.38456   1.851   0.0643 .  
## DvR                           -0.80399    0.09506  -8.458  < 2e-16 ***
## IvDR                           0.49753    0.10997   4.524 6.35e-06 ***
## blackVother:index_diffANTR_w2 -1.09185    0.76842  -1.421   0.1555    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.047 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.05028,    Adjusted R-squared:  0.04833 
## F-statistic: 25.75 on 5 and 2432 DF,  p-value: < 2.2e-16

d1. vaxxAttitudes ~ (ANALYTIC - THREAT) * education.c + partyID

m9.cc <- lm(vaxxAttitudes_w2 ~ edu.c * index_diffANTR_w2 + DvR + IvDR, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c * index_diffANTR_w2 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1051 -1.2431  0.0319  1.9173  3.7633 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.27634    0.04580   6.033 1.85e-09 ***
## edu.c                    0.06709    0.01641   4.090 4.46e-05 ***
## index_diffANTR_w2        0.26178    0.25614   1.022    0.307    
## DvR                     -0.59653    0.09239  -6.457 1.29e-10 ***
## IvDR                     0.46357    0.11122   4.168 3.18e-05 ***
## edu.c:index_diffANTR_w2  0.08424    0.10357   0.813    0.416    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.066 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.032,  Adjusted R-squared:  0.03001 
## F-statistic: 16.08 on 5 and 2432 DF,  p-value: 1.271e-15

d2. vaxxAttitudes ~ (ANALYTIC - THREAT) * education.c + partyID

m10.cc <- lm(vaxxAttitudes_w2 ~ edu.c * index_diffANTR_w2 + DvR + IvDR, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxAttitudes_w2 ~ edu.c * index_diffANTR_w2 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -4.1051 -1.2431  0.0319  1.9173  3.7633 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              0.27634    0.04580   6.033 1.85e-09 ***
## edu.c                    0.06709    0.01641   4.090 4.46e-05 ***
## index_diffANTR_w2        0.26178    0.25614   1.022    0.307    
## DvR                     -0.59653    0.09239  -6.457 1.29e-10 ***
## IvDR                     0.46357    0.11122   4.168 3.18e-05 ***
## edu.c:index_diffANTR_w2  0.08424    0.10357   0.813    0.416    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 2.066 on 2432 degrees of freedom
##   (843 observations deleted due to missingness)
## Multiple R-squared:  0.032,  Adjusted R-squared:  0.03001 
## F-statistic: 16.08 on 5 and 2432 DF,  p-value: 1.271e-15

iii. Wave 3

a1. vaxxBehavior ~ (ANALYTIC - THREAT) * ruralVother + partyID

m9.cc <- lm(vaxxBehavior ~ ruralVother * index_diffANTR_w3 + DvR + IvDR, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_diffANTR_w3 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6996 -0.5974  0.3544  0.8174  1.5549 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.09643    0.04589  67.481  < 2e-16 ***
## ruralVother                    0.33949    0.08800   3.858 0.000122 ***
## index_diffANTR_w3             -0.12093    0.31475  -0.384 0.700908    
## DvR                           -0.68086    0.07836  -8.689  < 2e-16 ***
## IvDR                           0.12474    0.09554   1.306 0.192000    
## ruralVother:index_diffANTR_w3  0.62893    0.62809   1.001 0.316904    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.117 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09318,    Adjusted R-squared:  0.0886 
## F-statistic: 20.34 on 5 and 990 DF,  p-value: < 2.2e-16

a2. vaxxBehavior ~ (ANALYTIC - THREAT) * ruralVother + partyID

m10.cc <- lm(vaxxBehavior ~ ruralVother * index_diffANTR_w3 + DvR + IvDR, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ ruralVother * index_diffANTR_w3 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6996 -0.5974  0.3544  0.8174  1.5549 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.09643    0.04589  67.481  < 2e-16 ***
## ruralVother                    0.33949    0.08800   3.858 0.000122 ***
## index_diffANTR_w3             -0.12093    0.31475  -0.384 0.700908    
## DvR                           -0.68086    0.07836  -8.689  < 2e-16 ***
## IvDR                           0.12474    0.09554   1.306 0.192000    
## ruralVother:index_diffANTR_w3  0.62893    0.62809   1.001 0.316904    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.117 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09318,    Adjusted R-squared:  0.0886 
## F-statistic: 20.34 on 5 and 990 DF,  p-value: < 2.2e-16

b1. vaxxBehavior ~ (ANALYTIC - THREAT) * whiteVother + partyID

m9.cc <- lm(vaxxBehavior ~ whiteVother * index_diffANTR_w3 + DvR + IvDR, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_diffANTR_w3 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6453 -0.5691  0.4178  0.9018  1.1714 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.20247    0.04311  74.286   <2e-16 ***
## whiteVother                    0.05723    0.08358   0.685    0.494    
## index_diffANTR_w3              0.15487    0.30440   0.509    0.611    
## DvR                           -0.69999    0.08152  -8.586   <2e-16 ***
## IvDR                           0.14690    0.09654   1.522    0.128    
## whiteVother:index_diffANTR_w3  0.18101    0.60713   0.298    0.766    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.125 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.07998,    Adjusted R-squared:  0.07534 
## F-statistic: 17.21 on 5 and 990 DF,  p-value: 2.337e-16

b2. vaxxBehavior ~ (ANALYTIC - THREAT) * whiteVother + partyID

m10.cc <- lm(vaxxBehavior ~ whiteVother * index_diffANTR_w3 + DvR + IvDR, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ whiteVother * index_diffANTR_w3 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6453 -0.5691  0.4178  0.9018  1.1714 
## 
## Coefficients:
##                               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.20247    0.04311  74.286   <2e-16 ***
## whiteVother                    0.05723    0.08358   0.685    0.494    
## index_diffANTR_w3              0.15487    0.30440   0.509    0.611    
## DvR                           -0.69999    0.08152  -8.586   <2e-16 ***
## IvDR                           0.14690    0.09654   1.522    0.128    
## whiteVother:index_diffANTR_w3  0.18101    0.60713   0.298    0.766    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.125 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.07998,    Adjusted R-squared:  0.07534 
## F-statistic: 17.21 on 5 and 990 DF,  p-value: 2.337e-16

c1. vaxxBehavior ~ (ANALYTIC - THREAT) * blackVother + partyID

m9.cc <- lm(vaxxBehavior ~ blackVother * index_diffANTR_w3 + DvR + IvDR, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_diffANTR_w3 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6604 -0.4412  0.3713  0.8787  1.3429 
## 
## Coefficients:
##                                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.105492   0.062499  49.688   <2e-16 ***
## blackVother                    0.212522   0.122166   1.740   0.0822 .  
## index_diffANTR_w3             -0.006048   0.406342  -0.015   0.9881    
## DvR                           -0.744730   0.080662  -9.233   <2e-16 ***
## IvDR                           0.135016   0.096039   1.406   0.1601    
## blackVother:index_diffANTR_w3  0.248808   0.810946   0.307   0.7591    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.124 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08232,    Adjusted R-squared:  0.07769 
## F-statistic: 17.76 on 5 and 990 DF,  p-value: < 2.2e-16

c2. vaxxBehavior ~ (ANALYTIC - THREAT) * blackVother + partyID

m10.cc <- lm(vaxxBehavior ~ blackVother * index_diffANTR_w3 + DvR + IvDR, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ blackVother * index_diffANTR_w3 + 
##     DvR + IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.6604 -0.4412  0.3713  0.8787  1.3429 
## 
## Coefficients:
##                                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)                    3.105492   0.062499  49.688   <2e-16 ***
## blackVother                    0.212522   0.122166   1.740   0.0822 .  
## index_diffANTR_w3             -0.006048   0.406342  -0.015   0.9881    
## DvR                           -0.744730   0.080662  -9.233   <2e-16 ***
## IvDR                           0.135016   0.096039   1.406   0.1601    
## blackVother:index_diffANTR_w3  0.248808   0.810946   0.307   0.7591    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.124 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.08232,    Adjusted R-squared:  0.07769 
## F-statistic: 17.76 on 5 and 990 DF,  p-value: < 2.2e-16

d1. vaxxBehavior ~ (ANALYTIC - THREAT) * education.c + partyID

m9.cc <- lm(vaxxBehavior ~ edu.c * index_diffANTR_w3 + DvR + IvDR, data = dw)
summary(m9.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_diffANTR_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7323 -0.4393  0.3316  0.8236  1.9660 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              3.16606    0.03939  80.386  < 2e-16 ***
## edu.c                    0.06115    0.01402   4.362 1.42e-05 ***
## index_diffANTR_w3       -0.03746    0.26220  -0.143    0.886    
## DvR                     -0.71993    0.07788  -9.243  < 2e-16 ***
## IvDR                     0.13015    0.09531   1.365    0.172    
## edu.c:index_diffANTR_w3  0.13431    0.10667   1.259    0.208    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.115 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09689,    Adjusted R-squared:  0.09233 
## F-statistic: 21.24 on 5 and 990 DF,  p-value: < 2.2e-16

d2. vaxxBehavior ~ (ANALYTIC - THREAT) * education.c + partyID

m10.cc <- lm(vaxxBehavior ~ edu.c * index_diffANTR_w3 + DvR + IvDR, data = dw)
summary(m10.cc)

## 
## Call:
## lm(formula = vaxxBehavior ~ edu.c * index_diffANTR_w3 + DvR + 
##     IvDR, data = dw)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -2.7323 -0.4393  0.3316  0.8236  1.9660 
## 
## Coefficients:
##                         Estimate Std. Error t value Pr(>|t|)    
## (Intercept)              3.16606    0.03939  80.386  < 2e-16 ***
## edu.c                    0.06115    0.01402   4.362 1.42e-05 ***
## index_diffANTR_w3       -0.03746    0.26220  -0.143    0.886    
## DvR                     -0.71993    0.07788  -9.243  < 2e-16 ***
## IvDR                     0.13015    0.09531   1.365    0.172    
## edu.c:index_diffANTR_w3  0.13431    0.10667   1.259    0.208    
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 1.115 on 990 degrees of freedom
##   (2285 observations deleted due to missingness)
## Multiple R-squared:  0.09689,    Adjusted R-squared:  0.09233 
## F-statistic: 21.24 on 5 and 990 DF,  p-value: < 2.2e-16