MT_w123_4_19_2022
Dani Grant
4/19/2022
- 0. set up
- I. descriptives + visualizations
- correlations
- II. Analyses
- A. Analytic
- i. Wave 1
- a. vaxxAttitudes_w1 ~ ANALYTIC * area
- b. vaxxAttitudes_w1 ~ ANALYTIC * area + sum.media.exposure
- c. vaxxAttitudes_w1 ~ ANALYTIC * ethnicity1
- d. vaxxAttitudes_w1 ~ ANALYTIC * ethnicity1 + sum.media.exposure
- e. vaxxAttitudes_w1 ~ ANALYTIC * ethnicity2
- f. vaxxAttitudes_w1 ~ ANALYTIC * ethnicity2 + sum.media.exposure
- ii. Wave 2
- a. vaxxAttitudes_w2 ~ ANALYTIC * area
- b. vaxxAttitudes_w2 ~ ANALYTIC * area + sum.media.exposure
- c. vaxxAttitudes ~ ANALYTIC * ethnicity1
- d. vaxxAttitudes ~ ANALYTIC * ethnicity1 + sum.media.exposure
- e. vaxxAttitudes ~ ANALYTIC * ethnicity2
- f. vaxxAttitudes ~ ANALYTIC * ethnicity2 + sum.media.exposure
- i. Wave 1
- B. Affect
- i. Wave 1
- a. vaxxAttitudes_w1 ~ AFFECT * area
- b. vaxxAttitudes_w1 ~ AFFECT * area + sum.media.exposure
- c. vaxxAttitudes_w1 ~ AFFECT * ethnicity1
- d. vaxxAttitudes_w1 ~ AFFECT * ethnicity1 + sum.media.exposure
- e. vaxxAttitudes_w1 ~ AFFECT * ethnicity2
- f. vaxxAttitudes_w1 ~ AFFECT * ethnicity2 + sum.media.exposure
- ii. Wave 2
- a. vaxxAttitudes_w2 ~ AFFECT * area
- b. vaxxAttitudes_w2 ~ AFFECT * area + sum.media.exposure
- c. vaxxAttitudes_w2 ~ AFFECT * ethnicity1
- d. vaxxAttitudes_w2 ~ AFFECT * ethnicity1 + sum.media.exposure
- e. vaxxAttitudes_w2 ~ AFFECT * ethnicity2
- f. vaxxAttitudes_w2 ~ AFFECT * ethnicity2 + sum.media.exposure
- i. Wave 1
- C. Threat
- i. Wave 1
- a. vaxxAttitudes_w1 ~ THREAT * area
- b. vaxxAttitudes_w1 ~ THREAT * area + sum.media.exposure
- c. vaxxAttitudes_w1 ~ THREAT * ethnicity1
- d. vaxxAttitudes_w1 ~ THREAT * ethnicity1 + sum.media.exposure
- e. vaxxAttitudes_w1 ~ THREAT * ethnicity2
- f. vaxxAttitudes_w1 ~ THREAT * ethnicity2 + sum.media.exposure
- ii. Wave 2
- a. vaxxAttitudes_w2 ~ THREAT * area
- b. vaxxAttitudes_w2 ~ THREAT * area + sum.media.exposure
- c. vaxxAttitudes_w2 ~ THREAT * ethnicity1
- d. vaxxAttitudes_w2 ~ THREAT * ethnicity1 + sum.media.exposure
- e. vaxxAttitudes_w2 ~ THREAT * ethnicity2
- f. vaxxAttitudes_w2 ~ THREAT * ethnicity2 + sum.media.exposure
- i. Wave 1
- D. Analytic - Affect
- i. Wave 1
- a. vaxxAttitudes_w1 ~ (ANALYTIC - AFFECT) * area
- b. vaxxAttitudes_w1 ~ (ANALYTIC - AFFECT) * area + sum.media.exposure
- c. vaxxAttitudes_w1 ~ (ANALYTIC - AFFECT) * ethnicity1
- d. vaxxAttitudes_w1 ~ (ANALYTIC - AFFECT) * ethnicity1 + sum.media.exposure
- e. vaxxAttitudes_w1 ~ (ANALYTIC - AFFECT) * ethnicity2
- f. vaxxAttitudes_w1 ~ (ANALYTIC - AFFECT) * ethnicity2 + sum.media.exposure
- ii. Wave 2
- a. vaxxAttitudes_w2 ~ (ANALYTIC - AFFECT) * area
- b. vaxxAttitudes_w2 ~ (ANALYTIC - AFFECT) * area + sum.media.exposure
- c. vaxxAttitudes_w2 ~ (ANALYTIC - AFFECT) * ethnicity1
- d. vaxxAttitudes_w2 ~ (ANALYTIC - AFFECT) * ethnicity1 + sum.media.exposure
- e. vaxxAttitudes_w2 ~ (ANALYTIC - AFFECT) * ethnicity2
- f. vaxxAttitudes_w2 ~ (ANALYTIC - AFFECT) * ethnicity2 + sum.media.exposure
- i. Wave 1
- E. Analytic - Threat
- i. Wave 1
- a. vaxxAttitudes_w1 ~ (ANALYTIC - THREAT) * area
- b. vaxxAttitudes_w1 ~ (ANALYTIC - THREAT) * area + sum.media.exposure
- c. vaxxAttitudes_w1 ~ (ANALYTIC - THREAT) * ethnicity1
- d. vaxxAttitudes_w1 ~ (ANALYTIC - THREAT) * ethnicity1 + sum.media.exposure
- e. vaxxAttitudes_w1 ~ (ANALYTIC - THREAT) * ethnicity2
- f. vaxxAttitudes_w1 ~ (ANALYTIC - THREAT) * ethnicity2 + sum.media.exposure
- ii. Wave 2
- a. vaxxAttitudes_w2 ~ (ANALYTIC - THREAT) * area
- b. vaxxAttitudes_w2 ~ (ANALYTIC - THREAT) * area + sum.media.exposure
- c. vaxxAttitudes_w2 ~ (ANALYTIC - THREAT) * ethnicity1
- d. vaxxAttitudes_w2 ~ (ANALYTIC - THREAT) * ethnicity1 + sum.media.exposure
- e. vaxxAttitudes_w2 ~ (ANALYTIC - THREAT) * ethnicity2
- f. vaxxAttitudes_w2 ~ (ANALYTIC - THREAT) * ethnicity2 + sum.media.exposure
- i. Wave 1
- A. Analytic
0. set up
libraries and data sets
LIWC set up
data set up
wide merged data
I. descriptives + visualizations
age, edu, SESladder
## 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- proportions for ethnicity
##
## asian black latinx native american
## 283 440 285 27
## pacific islander white
## 15 2186##
## asian black latinx native american
## 0.087 0.136 0.088 0.008
## pacific islander white
## 0.005 0.676- proportions for living area
##
## rural suburban urban
## 678 1655 948##
## rural suburban urban
## 0.207 0.504 0.289- DVs
## M SD Min Max
## vaxxAttitudes_w1 0.61 2.15 -3 3
## vaxxAttitudes_w2 0.38 2.10 -3 3
## vaxxBehavior 3.23 1.17 1 4- DVs across living area
describeBy(dw$vaxxAttitudes_w1, dw$area_factor)##
## Descriptive statistics by group
## group: rural
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 678 0.26 2.26 0 0.32 2.97 -3 3 6 -0.23 -1.38 0.09
## ------------------------------------------------------------
## group: suburban
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 1655 0.7 2.1 1 0.87 2.97 -3 3 6 -0.53 -1.01 0.05
## ------------------------------------------------------------
## group: urban
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 948 0.72 2.13 1 0.9 2.97 -3 3 6 -0.54 -1.02 0.07describeBy(dw$vaxxAttitudes_w2, dw$area_factor)##
## Descriptive statistics by group
## group: rural
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 506 0.09 2.16 0 0.12 2.97 -3 3 6 -0.16 -1.25 0.1
## ------------------------------------------------------------
## group: suburban
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 1254 0.47 2.07 0 0.59 2.97 -3 3 6 -0.37 -1.03 0.06
## ------------------------------------------------------------
## group: urban
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 692 0.44 2.09 0 0.55 2.97 -3 3 6 -0.33 -1.08 0.08describeBy(dw$vaxxBehavior, dw$area_factor)##
## Descriptive statistics by group
## group: rural
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 225 2.91 1.32 4 3.01 0 1 4 3 -0.63 -1.41 0.09
## ------------------------------------------------------------
## group: suburban
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 521 3.28 1.14 4 3.48 0 1 4 3 -1.3 0.03 0.05
## ------------------------------------------------------------
## group: urban
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 282 3.39 1.07 4 3.61 0 1 4 3 -1.54 0.79 0.06- DVs across ethnicity
describeBy(dw$vaxxAttitudes_w1, dw$race_factor)##
## Descriptive statistics by group
## group: asian
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 283 1.32 1.67 2 1.54 1.48 -3 3 6 -0.84 0.04 0.1
## ------------------------------------------------------------
## group: black
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 440 0 2.15 0 0 2.97 -3 3 6 -0.1 -1.29 0.1
## ------------------------------------------------------------
## group: latinx
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 285 0.79 2 1 0.98 2.97 -3 3 6 -0.53 -0.86 0.12
## ------------------------------------------------------------
## group: native american
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 27 -0.26 2.38 0 -0.3 4.45 -3 3 6 0.12 -1.56 0.46
## ------------------------------------------------------------
## group: pacific islander
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 15 0.53 1.73 0 0.62 1.48 -3 3 6 -0.01 -0.84 0.45
## ------------------------------------------------------------
## group: white
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 2186 0.65 2.18 1 0.82 2.97 -3 3 6 -0.5 -1.13 0.05describeBy(dw$vaxxAttitudes_w2, dw$race_factor)##
## Descriptive statistics by group
## group: asian
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 222 0.78 1.88 1 0.97 1.48 -3 3 6 -0.59 -0.59 0.13
## ------------------------------------------------------------
## group: black
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 299 -0.26 2.06 0 -0.32 2.97 -3 3 6 0.09 -1.09 0.12
## ------------------------------------------------------------
## group: latinx
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 189 0.53 1.93 0 0.65 2.97 -3 3 6 -0.34 -0.79 0.14
## ------------------------------------------------------------
## group: native american
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 21 0.43 2.23 1 0.53 2.97 -3 3 6 -0.31 -1.33 0.49
## ------------------------------------------------------------
## group: pacific islander
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 8 0 2.27 0 0 2.97 -3 3 6 -0.13 -1.7 0.8
## ------------------------------------------------------------
## group: white
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 1684 0.45 2.12 0 0.56 2.97 -3 3 6 -0.36 -1.11 0.05describeBy(dw$vaxxBehavior, dw$race_factor)##
## Descriptive statistics by group
## group: asian
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 82 3.73 0.75 4 3.94 0 1 4 3 -2.93 7.57 0.08
## ------------------------------------------------------------
## group: black
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 112 3.27 1.16 4 3.46 0 1 4 3 -1.24 -0.17 0.11
## ------------------------------------------------------------
## group: latinx
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 78 3.4 1.01 4 3.59 0 1 4 3 -1.59 1.14 0.11
## ------------------------------------------------------------
## group: native american
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 6 3.5 1.22 4 3.5 0 1 4 3 -1.36 -0.08 0.5
## ------------------------------------------------------------
## group: pacific islander
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 3 2.67 1.53 3 2.67 1.48 1 4 3 -0.21 -2.33 0.88
## ------------------------------------------------------------
## group: white
## vars n mean sd median trimmed mad min max range skew kurtosis se
## X1 1 738 3.16 1.21 4 3.33 0 1 4 3 -1.06 -0.6 0.04- 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
a. vaxxAttitudes_w1 ~ ANALYTIC * area
- contrast model
m1.cc <- lm(vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_ANexp_w1, data = dw)
summary(m1.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_ANexp_w1,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.0737 -1.6359 0.2871 2.2140 3.0386
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.60434 0.04594 13.154 < 2e-16 ***
## ruralVsu 0.44354 0.10886 4.074 4.73e-05 ***
## subVurb 0.06030 0.09762 0.618 0.5368
## index_ANexp_w1 0.29247 0.13856 2.111 0.0349 *
## ruralVsu:index_ANexp_w1 -0.01137 0.32678 -0.035 0.9722
## subVurb:index_ANexp_w1 0.28556 0.29668 0.963 0.3359
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.143 on 3275 degrees of freedom
## Multiple R-squared: 0.008794, Adjusted R-squared: 0.007281
## F-statistic: 5.811 on 5 and 3275 DF, p-value: 2.38e-05b. vaxxAttitudes_w1 ~ ANALYTIC * area + sum.media.exposure
- contrast model
m2.cc <- lm(vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_ANexp_w1 + sum.media.exp_w1, data = dw)
summary(m2.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_ANexp_w1 +
## sum.media.exp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.1813 -1.6228 0.2959 1.8213 3.1734
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.020721 0.064732 0.320 0.74891
## ruralVsu 0.291219 0.107061 2.720 0.00656 **
## subVurb -0.038855 0.095707 -0.406 0.68479
## index_ANexp_w1 0.188765 0.135638 1.392 0.16411
## sum.media.exp_w1 0.043395 0.003468 12.514 < 2e-16 ***
## ruralVsu:index_ANexp_w1 -0.067344 0.319315 -0.211 0.83298
## subVurb:index_ANexp_w1 0.251998 0.289882 0.869 0.38474
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.094 on 3274 degrees of freedom
## Multiple R-squared: 0.05404, Adjusted R-squared: 0.05231
## F-statistic: 31.17 on 6 and 3274 DF, p-value: < 2.2e-16c. vaxxAttitudes_w1 ~ ANALYTIC * ethnicity1
- contrast model
m11.cc <- lm(vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_ANexp_w1, data = dw)
summary(m11.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_ANexp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.3846 -1.6194 0.3143 2.1770 3.3701
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.53561 0.13670 3.918 9.11e-05 ***
## wVb -0.65810 0.13288 -4.952 7.71e-07 ***
## wVa 0.71516 0.14573 4.908 9.68e-07 ***
## wVlx 0.08678 0.14392 0.603 0.5466
## wVna -0.86819 0.52520 -1.653 0.0984 .
## wVpa -0.19975 0.59001 -0.339 0.7350
## index_ANexp_w1 0.20312 0.37781 0.538 0.5909
## wVb:index_ANexp_w1 -0.08422 0.35717 -0.236 0.8136
## wVa:index_ANexp_w1 0.60825 0.51319 1.185 0.2360
## wVlx:index_ANexp_w1 -0.30743 0.45360 -0.678 0.4980
## wVna:index_ANexp_w1 0.18299 1.63850 0.112 0.9111
## wVpa:index_ANexp_w1 -0.50539 1.39881 -0.361 0.7179
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.123 on 3224 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.0242, Adjusted R-squared: 0.02087
## F-statistic: 7.27 on 11 and 3224 DF, p-value: 2.203e-12d. vaxxAttitudes_w1 ~ ANALYTIC * ethnicity1 + sum.media.exposure
- contrast model
m22.cc <- lm(vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_ANexp_w1 + sum.media.exp_w1, data = dw)
summary(m22.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_ANexp_w1 + sum.media.exp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.8900 -1.6143 0.3293 1.7618 3.8106
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.216857 0.144274 -1.503 0.132913
## wVb -0.931462 0.130895 -7.116 1.36e-12 ***
## wVa 0.477516 0.142902 3.342 0.000843 ***
## wVlx -0.114773 0.140846 -0.815 0.415202
## wVna -1.038143 0.511237 -2.031 0.042372 *
## wVpa -0.419255 0.574382 -0.730 0.465490
## index_ANexp_w1 0.117157 0.367709 0.319 0.750040
## sum.media.exp_w1 0.047076 0.003494 13.474 < 2e-16 ***
## wVb:index_ANexp_w1 -0.125285 0.347588 -0.360 0.718540
## wVa:index_ANexp_w1 0.347805 0.499768 0.696 0.486521
## wVlx:index_ANexp_w1 -0.437250 0.441518 -0.990 0.322085
## wVna:index_ANexp_w1 0.166856 1.594459 0.105 0.916662
## wVpa:index_ANexp_w1 0.046579 1.361829 0.034 0.972717
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.066 on 3223 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.07624, Adjusted R-squared: 0.0728
## F-statistic: 22.17 on 12 and 3223 DF, p-value: < 2.2e-16e. vaxxAttitudes_w1 ~ ANALYTIC * ethnicity2
- contrast model
m1.cc <- lm(vaxxAttitudes_w1 ~ (aVother + wVother + naVother + lxVother + bVother) * index_ANexp_w1, data = dw)
summary(m1.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_ANexp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.3846 -1.6194 0.3143 2.1770 3.3701
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.53561 0.13670 3.918 9.11e-05 ***
## aVother 0.86917 0.17619 4.933 8.50e-07 ***
## wVother 0.15402 0.14314 1.076 0.28201
## naVother -0.71417 0.44808 -1.594 0.11106
## lxVother 0.24080 0.17520 1.374 0.16940
## bVother -0.50408 0.16929 -2.978 0.00293 **
## index_ANexp_w1 0.20312 0.37781 0.538 0.59088
## aVother:index_ANexp_w1 0.62589 0.54931 1.139 0.25462
## wVother:index_ANexp_w1 0.01763 0.39914 0.044 0.96476
## naVother:index_ANexp_w1 0.20062 1.38418 0.145 0.88477
## lxVother:index_ANexp_w1 -0.28979 0.51317 -0.565 0.57230
## bVother:index_ANexp_w1 -0.06659 0.45958 -0.145 0.88481
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.123 on 3224 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.0242, Adjusted R-squared: 0.02087
## F-statistic: 7.27 on 11 and 3224 DF, p-value: 2.203e-12f. vaxxAttitudes_w1 ~ ANALYTIC * ethnicity2 + sum.media.exposure
- contrast model
m2.cc <- lm(vaxxAttitudes_w1 ~ (aVother + wVother + naVother + lxVother + bVother) * index_ANexp_w1 + sum.media.exp_w1, data = dw)
summary(m2.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_ANexp_w1 + sum.media.exp_w1,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.8900 -1.6143 0.3293 1.7618 3.8106
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.2168572 0.1442740 -1.503 0.132913
## aVother 0.8152023 0.1715012 4.753 2.09e-06 ***
## wVother 0.3376862 0.1399577 2.413 0.015887 *
## naVother -0.7004572 0.4360355 -1.606 0.108279
## lxVother 0.2229136 0.1704925 1.307 0.191147
## bVother -0.5937761 0.1648700 -3.601 0.000321 ***
## index_ANexp_w1 0.1171572 0.3677091 0.319 0.750040
## sum.media.exp_w1 0.0470763 0.0034939 13.474 < 2e-16 ***
## aVother:index_ANexp_w1 0.3480209 0.5349444 0.651 0.515368
## wVother:index_ANexp_w1 0.0002159 0.3884111 0.001 0.999557
## naVother:index_ANexp_w1 0.1670720 1.3469777 0.124 0.901296
## lxVother:index_ANexp_w1 -0.4370345 0.4994928 -0.875 0.381663
## bVother:index_ANexp_w1 -0.1250693 0.4472522 -0.280 0.779772
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.066 on 3223 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.07624, Adjusted R-squared: 0.0728
## F-statistic: 22.17 on 12 and 3223 DF, p-value: < 2.2e-16ii. Wave 2
a. vaxxAttitudes_w2 ~ ANALYTIC * area
- contrast model
m1.cc <- lm(vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_ANexp_w2, data = dw)
summary(m1.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_ANexp_w2,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.8502 -1.4525 -0.0923 1.8263 3.0851
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.33846 0.05173 6.543 7.33e-11 ***
## ruralVsu 0.44108 0.12005 3.674 0.000244 ***
## subVurb 0.06311 0.11356 0.556 0.578448
## index_ANexp_w2 0.06129 0.16398 0.374 0.708610
## ruralVsu:index_ANexp_w2 0.52500 0.38373 1.368 0.171389
## subVurb:index_ANexp_w2 0.63540 0.35547 1.787 0.073981 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.091 on 2439 degrees of freedom
## (836 observations deleted due to missingness)
## Multiple R-squared: 0.007065, Adjusted R-squared: 0.00503
## F-statistic: 3.471 on 5 and 2439 DF, p-value: 0.003959b. vaxxAttitudes_w2 ~ ANALYTIC * area + sum.media.exposure
- contrast model
m2.cc <- lm(vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_ANexp_w2 + sum.media.exp_w2, data = dw)
summary(m2.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_ANexp_w2 +
## sum.media.exp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.778 -1.365 0.000 1.766 3.309
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.112985 0.070576 -1.601 0.1095
## ruralVsu 0.294714 0.119092 2.475 0.0134 *
## subVurb -0.029404 0.112099 -0.262 0.7931
## index_ANexp_w2 0.013800 0.161309 0.086 0.9318
## sum.media.exp_w2 0.037034 0.004014 9.226 <2e-16 ***
## ruralVsu:index_ANexp_w2 0.448785 0.377371 1.189 0.2345
## subVurb:index_ANexp_w2 0.594416 0.349519 1.701 0.0891 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.055 on 2438 degrees of freedom
## (836 observations deleted due to missingness)
## Multiple R-squared: 0.04056, Adjusted R-squared: 0.0382
## F-statistic: 17.18 on 6 and 2438 DF, p-value: < 2.2e-16c. vaxxAttitudes ~ ANALYTIC * ethnicity1
- contrast model
m1.cc <- lm(vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_ANexp_w2, data = dw)
summary(m1.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_ANexp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.9315 -1.4070 0.1238 1.6640 3.7705
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.4094 0.1610 2.543 0.011042 *
## wVb -0.5200 0.1570 -3.312 0.000939 ***
## wVa 0.4218 0.1592 2.650 0.008113 **
## wVlx 0.2322 0.1832 1.268 0.205071
## wVna 0.2762 0.5646 0.489 0.624709
## wVpa -0.3308 0.7379 -0.448 0.653942
## index_ANexp_w2 0.1486 0.4827 0.308 0.758197
## wVb:index_ANexp_w2 0.9218 0.4181 2.204 0.027588 *
## wVa:index_ANexp_w2 0.7402 0.5719 1.294 0.195668
## wVlx:index_ANexp_w2 0.9404 0.5665 1.660 0.097026 .
## wVna:index_ANexp_w2 1.9504 2.2271 0.876 0.381248
## wVpa:index_ANexp_w2 -1.7386 1.6582 -1.048 0.294542
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.075 on 2404 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.01975, Adjusted R-squared: 0.01527
## F-statistic: 4.403 on 11 and 2404 DF, p-value: 1.401e-06d. vaxxAttitudes ~ ANALYTIC * ethnicity1 + sum.media.exposure
- contrast model
m2.cc <- lm(vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_ANexp_w2 + sum.media.exp_w2, data = dw)
summary(m2.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_ANexp_w2 + sum.media.exp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.9382 -1.3796 0.0307 1.7370 3.8103
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.209688 0.169406 -1.238 0.216
## wVb -0.779613 0.156000 -4.998 6.23e-07 ***
## wVa 0.106369 0.159145 0.668 0.504
## wVlx -0.004125 0.181032 -0.023 0.982
## wVna 0.131574 0.553418 0.238 0.812
## wVpa -0.528190 0.723382 -0.730 0.465
## index_ANexp_w2 -0.084776 0.473536 -0.179 0.858
## sum.media.exp_w2 0.041018 0.004092 10.025 < 2e-16 ***
## wVb:index_ANexp_w2 0.784020 0.409978 1.912 0.056 .
## wVa:index_ANexp_w2 0.229235 0.562694 0.407 0.684
## wVlx:index_ANexp_w2 0.754341 0.555391 1.358 0.175
## wVna:index_ANexp_w2 1.320981 2.183341 0.605 0.545
## wVpa:index_ANexp_w2 -1.800301 1.624971 -1.108 0.268
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.034 on 2403 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.0591, Adjusted R-squared: 0.0544
## F-statistic: 12.58 on 12 and 2403 DF, p-value: < 2.2e-16e. vaxxAttitudes ~ ANALYTIC * ethnicity2
- contrast model
m1.cc <- lm(vaxxAttitudes_w2 ~ (aVother + wVother + naVother + lxVother + bVother) * index_ANexp_w2, data = dw)
summary(m1.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_ANexp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.9315 -1.4070 0.1238 1.6640 3.7705
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.40942 0.16098 2.543 0.01104 *
## aVother 0.40858 0.20123 2.030 0.04243 *
## wVother -0.01322 0.16802 -0.079 0.93727
## naVother 0.26299 0.48589 0.541 0.58838
## lxVother 0.21895 0.21439 1.021 0.30723
## bVother -0.53322 0.20007 -2.665 0.00775 **
## index_ANexp_w2 0.14860 0.48265 0.308 0.75820
## aVother:index_ANexp_w2 0.27116 0.65312 0.415 0.67806
## wVother:index_ANexp_w2 -0.46903 0.50730 -0.925 0.35528
## naVother:index_ANexp_w2 1.48141 1.87492 0.790 0.42954
## lxVother:index_ANexp_w2 0.47133 0.64997 0.725 0.46843
## bVother:index_ANexp_w2 0.45273 0.57019 0.794 0.42727
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.075 on 2404 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.01975, Adjusted R-squared: 0.01527
## F-statistic: 4.403 on 11 and 2404 DF, p-value: 1.401e-06f. vaxxAttitudes ~ ANALYTIC * ethnicity2 + sum.media.exposure
- contrast model
m2.cc <- lm(vaxxAttitudes_w2 ~ (aVother + wVother + naVother + lxVother + bVother) * index_ANexp_w2 + sum.media.exp_w2, data = dw)
summary(m2.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_ANexp_w2 + sum.media.exp_w2,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.9382 -1.3796 0.0307 1.7370 3.8103
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.209688 0.169406 -1.238 0.21592
## aVother 0.285366 0.197576 1.444 0.14877
## wVother 0.178998 0.165758 1.080 0.28031
## naVother 0.310571 0.476157 0.652 0.51430
## lxVother 0.174873 0.210137 0.832 0.40539
## bVother -0.600615 0.196169 -3.062 0.00223 **
## index_ANexp_w2 -0.084776 0.473536 -0.179 0.85793
## sum.media.exp_w2 0.041018 0.004092 10.025 < 2e-16 ***
## aVother:index_ANexp_w2 0.014522 0.640524 0.023 0.98191
## wVother:index_ANexp_w2 -0.214713 0.497762 -0.431 0.66625
## naVother:index_ANexp_w2 1.106269 1.837667 0.602 0.54723
## lxVother:index_ANexp_w2 0.539628 0.636962 0.847 0.39697
## bVother:index_ANexp_w2 0.569307 0.558864 1.019 0.30845
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.034 on 2403 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.0591, Adjusted R-squared: 0.0544
## F-statistic: 12.58 on 12 and 2403 DF, p-value: < 2.2e-16B. Affect
i. Wave 1
a. vaxxAttitudes_w1 ~ AFFECT * area
- contrast model
m3.cc <- lm(vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_AFexp_w1, data = dw)
summary(m3.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_AFexp_w1,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.2160 -1.5778 0.2983 2.0864 3.4213
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.46426 0.04559 10.182 < 2e-16 ***
## ruralVsu 0.51095 0.10720 4.766 1.96e-06 ***
## subVurb 0.09015 0.09810 0.919 0.358
## index_AFexp_w1 0.55620 0.13086 4.250 2.19e-05 ***
## ruralVsu:index_AFexp_w1 -0.29995 0.31096 -0.965 0.335
## subVurb:index_AFexp_w1 -0.37294 0.27669 -1.348 0.178
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.138 on 3275 degrees of freedom
## Multiple R-squared: 0.01406, Adjusted R-squared: 0.01255
## F-statistic: 9.338 on 5 and 3275 DF, p-value: 7.6e-09b. vaxxAttitudes_w1 ~ AFFECT * area + sum.media.exposure
- contrast model
m4.cc <- lm(vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_AFexp_w1 + sum.media.exp_w1, data = dw)
summary(m4.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_AFexp_w1 +
## sum.media.exp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.0865 -1.5658 0.2756 1.8127 3.3137
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.074697 0.062449 -1.196 0.231731
## ruralVsu 0.358546 0.105541 3.397 0.000689 ***
## subVurb -0.013022 0.096279 -0.135 0.892422
## index_AFexp_w1 0.442941 0.128273 3.453 0.000561 ***
## sum.media.exp_w1 0.042671 0.003462 12.324 < 2e-16 ***
## ruralVsu:index_AFexp_w1 -0.253891 0.304056 -0.835 0.403770
## subVurb:index_AFexp_w1 -0.331328 0.270552 -1.225 0.220800
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.09 on 3274 degrees of freedom
## Multiple R-squared: 0.05777, Adjusted R-squared: 0.05604
## F-statistic: 33.45 on 6 and 3274 DF, p-value: < 2.2e-16c. vaxxAttitudes_w1 ~ AFFECT * ethnicity1
- contrast model
m33.cc <- lm(vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_AFexp_w1, data = dw)
summary(m33.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_AFexp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.5765 -1.5292 0.3047 1.9134 3.7421
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.357432 0.131682 2.714 0.00668 **
## wVb -0.739894 0.138604 -5.338 1.00e-07 ***
## wVa 0.713875 0.145950 4.891 1.05e-06 ***
## wVlx 0.211407 0.145831 1.450 0.14725
## wVna -1.297610 0.519588 -2.497 0.01256 *
## wVpa -0.002753 0.550440 -0.005 0.99601
## index_AFexp_w1 0.866515 0.448534 1.932 0.05346 .
## wVb:index_AFexp_w1 0.047356 0.333548 0.142 0.88711
## wVa:index_AFexp_w1 -0.181760 0.474232 -0.383 0.70154
## wVlx:index_AFexp_w1 -0.448105 0.449293 -0.997 0.31867
## wVna:index_AFexp_w1 2.549321 2.094207 1.217 0.22357
## wVpa:index_AFexp_w1 -0.917615 1.552025 -0.591 0.55440
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.114 on 3224 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.03209, Adjusted R-squared: 0.02878
## F-statistic: 9.716 on 11 and 3224 DF, p-value: < 2.2e-16d. vaxxAttitudes_w1 ~ AFFECT * ethnicity1 + sum.media.exposure
- contrast model
m44.cc <- lm(vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_AFexp_w1 + sum.media.exp_w1, data = dw)
summary(m44.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_AFexp_w1 + sum.media.exp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.9322 -1.6057 0.2832 1.7577 4.2401
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.362696 0.139127 -2.607 0.009177 **
## wVb -1.010287 0.136469 -7.403 1.69e-13 ***
## wVa 0.472089 0.143259 3.295 0.000994 ***
## wVlx 0.005318 0.142829 0.037 0.970302
## wVna -1.458888 0.506049 -2.883 0.003966 **
## wVpa -0.314831 0.536455 -0.587 0.557330
## index_AFexp_w1 0.769940 0.436782 1.763 0.078036 .
## sum.media.exp_w1 0.046330 0.003475 13.333 < 2e-16 ***
## wVb:index_AFexp_w1 0.160101 0.324874 0.493 0.622181
## wVa:index_AFexp_w1 0.014621 0.461978 0.032 0.974755
## wVlx:index_AFexp_w1 -0.352025 0.437520 -0.805 0.421114
## wVna:index_AFexp_w1 2.550280 2.039057 1.251 0.211129
## wVpa:index_AFexp_w1 -1.083391 1.511204 -0.717 0.473484
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.058 on 3223 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.08268, Adjusted R-squared: 0.07926
## F-statistic: 24.21 on 12 and 3223 DF, p-value: < 2.2e-16e. vaxxAttitudes_w1 ~ AFFECT * ethnicity2
- contrast model
m3.cc <- lm(vaxxAttitudes_w1 ~ (aVother + wVother + naVother + lxVother + bVother) * index_AFexp_w1, data = dw)
summary(m3.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_AFexp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.5765 -1.5292 0.3047 1.9134 3.7421
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.3574 0.1317 2.714 0.00668 **
## aVother 0.8997 0.1726 5.212 1.98e-07 ***
## wVother 0.1858 0.1382 1.345 0.17871
## naVother -1.1118 0.4422 -2.514 0.01199 *
## lxVother 0.3972 0.1725 2.302 0.02138 *
## bVother -0.5541 0.1685 -3.288 0.00102 **
## index_AFexp_w1 0.8665 0.4485 1.932 0.05346 .
## aVother:index_AFexp_w1 -0.3566 0.5798 -0.615 0.53852
## wVother:index_AFexp_w1 -0.1749 0.4649 -0.376 0.70687
## naVother:index_AFexp_w1 2.3745 1.7635 1.346 0.17826
## lxVother:index_AFexp_w1 -0.6230 0.5664 -1.100 0.27144
## bVother:index_AFexp_w1 -0.1275 0.5103 -0.250 0.80268
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.114 on 3224 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.03209, Adjusted R-squared: 0.02878
## F-statistic: 9.716 on 11 and 3224 DF, p-value: < 2.2e-16f. vaxxAttitudes_w1 ~ AFFECT * ethnicity2 + sum.media.exposure
- contrast model
m3.cc <- lm(vaxxAttitudes_w1 ~ (aVother + wVother + naVother + lxVother + bVother) * index_AFexp_w1 + sum.media.exp_w1, data = dw)
summary(m3.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_AFexp_w1 + sum.media.exp_w1,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.9322 -1.6057 0.2832 1.7577 4.2401
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.362696 0.139127 -2.607 0.00918 **
## aVother 0.856522 0.168091 5.096 3.68e-07 ***
## wVother 0.384433 0.135345 2.840 0.00453 **
## naVother -1.074455 0.430599 -2.495 0.01264 *
## lxVother 0.389751 0.167995 2.320 0.02040 *
## bVother -0.625854 0.164170 -3.812 0.00014 ***
## index_AFexp_w1 0.769940 0.436782 1.763 0.07804 .
## sum.media.exp_w1 0.046330 0.003475 13.333 < 2e-16 ***
## aVother:index_AFexp_w1 -0.200310 0.564616 -0.355 0.72278
## wVother:index_AFexp_w1 -0.214931 0.452708 -0.475 0.63499
## naVother:index_AFexp_w1 2.335349 1.717079 1.360 0.17390
## lxVother:index_AFexp_w1 -0.566956 0.551466 -1.028 0.30398
## bVother:index_AFexp_w1 -0.054830 0.496850 -0.110 0.91213
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.058 on 3223 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.08268, Adjusted R-squared: 0.07926
## F-statistic: 24.21 on 12 and 3223 DF, p-value: < 2.2e-16ii. Wave 2
a. vaxxAttitudes_w2 ~ AFFECT * area
- contrast model
m3.cc <- lm(vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_AFexp_w2, data = dw)
summary(m3.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_AFexp_w2,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.7634 -1.4201 -0.1292 1.7427 3.2991
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.29602 0.05034 5.880 4.66e-09 ***
## ruralVsu 0.44430 0.11779 3.772 0.000166 ***
## subVurb 0.04803 0.10915 0.440 0.659967
## index_AFexp_w2 0.25837 0.16305 1.585 0.113198
## ruralVsu:index_AFexp_w2 -0.56172 0.38528 -1.458 0.144975
## subVurb:index_AFexp_w2 -0.62422 0.34802 -1.794 0.072997 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.09 on 2439 degrees of freedom
## (836 observations deleted due to missingness)
## Multiple R-squared: 0.00808, Adjusted R-squared: 0.006046
## F-statistic: 3.973 on 5 and 2439 DF, p-value: 0.001363b. vaxxAttitudes_w2 ~ AFFECT * area + sum.media.exposure
- contrast model
m4.cc <- lm(vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_AFexp_w2 + sum.media.exp_w2, data = dw)
summary(m4.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_AFexp_w2 +
## sum.media.exp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.764 -1.335 0.012 1.808 3.343
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.13503 0.06799 -1.986 0.04714 *
## ruralVsu 0.30668 0.11675 2.627 0.00867 **
## subVurb -0.02675 0.10761 -0.249 0.80372
## index_AFexp_w2 0.14976 0.16073 0.932 0.35155
## sum.media.exp_w2 0.03717 0.00402 9.246 < 2e-16 ***
## ruralVsu:index_AFexp_w2 -0.54735 0.37877 -1.445 0.14857
## subVurb:index_AFexp_w2 -0.71575 0.34229 -2.091 0.03663 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.054 on 2438 degrees of freedom
## (836 observations deleted due to missingness)
## Multiple R-squared: 0.04168, Adjusted R-squared: 0.03933
## F-statistic: 17.67 on 6 and 2438 DF, p-value: < 2.2e-16c. vaxxAttitudes_w2 ~ AFFECT * ethnicity1
- contrast model
m3.cc <- lm(vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_AFexp_w2, data = dw)
summary(m3.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_AFexp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.9875 -1.4036 0.1489 1.6611 3.3967
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.27388 0.15582 1.758 0.0789 .
## wVb -0.71404 0.15590 -4.580 4.89e-06 ***
## wVa 0.33236 0.15719 2.114 0.0346 *
## wVlx 0.18673 0.17729 1.053 0.2923
## wVna -0.27596 0.51054 -0.541 0.5889
## wVpa -0.30731 0.73846 -0.416 0.6773
## index_AFexp_w2 1.33491 0.62128 2.149 0.0318 *
## wVb:index_AFexp_w2 -0.09972 0.42848 -0.233 0.8160
## wVa:index_AFexp_w2 0.14556 0.57774 0.252 0.8011
## wVlx:index_AFexp_w2 -0.76864 0.53683 -1.432 0.1523
## wVna:index_AFexp_w2 2.52937 2.20489 1.147 0.2514
## wVpa:index_AFexp_w2 4.06741 2.89305 1.406 0.1599
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.075 on 2404 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.0198, Adjusted R-squared: 0.01532
## F-statistic: 4.416 on 11 and 2404 DF, p-value: 1.328e-06d. vaxxAttitudes_w2 ~ AFFECT * ethnicity1 + sum.media.exposure
- contrast model
m4.cc <- lm(vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_AFexp_w2 + sum.media.exp_w2, data = dw)
summary(m4.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_AFexp_w2 + sum.media.exp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.0069 -1.3845 0.0126 1.7430 3.9799
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.32293 0.16367 -1.973 0.0486 *
## wVb -0.96724 0.15476 -6.250 4.85e-10 ***
## wVa 0.04095 0.15666 0.261 0.7938
## wVlx -0.01904 0.17486 -0.109 0.9133
## wVna -0.38776 0.50025 -0.775 0.4383
## wVpa -0.52860 0.72373 -0.730 0.4652
## index_AFexp_w2 1.31493 0.60860 2.161 0.0308 *
## sum.media.exp_w2 0.04124 0.00408 10.108 < 2e-16 ***
## wVb:index_AFexp_w2 0.05831 0.42003 0.139 0.8896
## wVa:index_AFexp_w2 0.35754 0.56634 0.631 0.5279
## wVlx:index_AFexp_w2 -0.75702 0.52588 -1.440 0.1501
## wVna:index_AFexp_w2 3.09447 2.16064 1.432 0.1522
## wVpa:index_AFexp_w2 3.81002 2.83415 1.344 0.1790
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.033 on 2403 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.05978, Adjusted R-squared: 0.05508
## F-statistic: 12.73 on 12 and 2403 DF, p-value: < 2.2e-16e. vaxxAttitudes_w2 ~ AFFECT * ethnicity2
- contrast model
m3.cc <- lm(vaxxAttitudes_w2 ~ (aVother + wVother + naVother + lxVother + bVother) * index_AFexp_w2, data = dw)
summary(m3.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_AFexp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.9875 -1.4036 0.1489 1.6611 3.3967
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.2739 0.1558 1.758 0.0789 .
## aVother 0.4621 0.1967 2.349 0.0189 *
## wVother 0.1297 0.1623 0.799 0.4242
## naVother -0.1463 0.4427 -0.330 0.7412
## lxVother 0.3164 0.2078 1.523 0.1279
## bVother -0.5843 0.1960 -2.981 0.0029 **
## index_AFexp_w2 1.3349 0.6213 2.149 0.0318 *
## aVother:index_AFexp_w2 -0.8334 0.7648 -1.090 0.2759
## wVother:index_AFexp_w2 -0.9790 0.6400 -1.530 0.1262
## naVother:index_AFexp_w2 1.5504 1.8983 0.817 0.4142
## lxVother:index_AFexp_w2 -1.7476 0.7447 -2.347 0.0190 *
## bVother:index_AFexp_w2 -1.0787 0.6963 -1.549 0.1214
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.075 on 2404 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.0198, Adjusted R-squared: 0.01532
## F-statistic: 4.416 on 11 and 2404 DF, p-value: 1.328e-06f. vaxxAttitudes_w2 ~ AFFECT * ethnicity2 + sum.media.exposure
- contrast model
m4.cc <- lm(vaxxAttitudes_w2 ~ (aVother + wVother + naVother + lxVother + bVother) * index_AFexp_w2 + sum.media.exp_w2, data = dw)
summary(m4.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_AFexp_w2 + sum.media.exp_w2,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.0069 -1.3845 0.0126 1.7430 3.9799
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.32293 0.16367 -1.973 0.04860 *
## aVother 0.35123 0.19302 1.820 0.06893 .
## wVother 0.31028 0.15997 1.940 0.05255 .
## naVother -0.07748 0.43373 -0.179 0.85825
## lxVother 0.29124 0.20357 1.431 0.15265
## bVother -0.65696 0.19217 -3.419 0.00064 ***
## index_AFexp_w2 1.31493 0.60860 2.161 0.03083 *
## sum.media.exp_w2 0.04124 0.00408 10.108 < 2e-16 ***
## aVother:index_AFexp_w2 -0.73635 0.74926 -0.983 0.32583
## wVother:index_AFexp_w2 -1.09389 0.62702 -1.745 0.08118 .
## naVother:index_AFexp_w2 2.00058 1.86008 1.076 0.28224
## lxVother:index_AFexp_w2 -1.85091 0.72955 -2.537 0.01124 *
## bVother:index_AFexp_w2 -1.03558 0.68209 -1.518 0.12908
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.033 on 2403 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.05978, Adjusted R-squared: 0.05508
## F-statistic: 12.73 on 12 and 2403 DF, p-value: < 2.2e-16C. Threat
i. Wave 1
a. vaxxAttitudes_w1 ~ THREAT * area
- contrast model
m3.cc <- lm(vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_TRexp_w1, data = dw)
summary(m3.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_TRexp_w1,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.8830 -1.6639 0.2812 2.2493 2.8823
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.54011 0.04549 11.872 < 2e-16 ***
## ruralVsu 0.46377 0.10693 4.337 1.49e-05 ***
## subVurb 0.06114 0.09794 0.624 0.532
## index_TRexp_w1 -0.12096 0.15293 -0.791 0.429
## ruralVsu:index_TRexp_w1 0.06316 0.35933 0.176 0.860
## subVurb:index_TRexp_w1 0.24440 0.32940 0.742 0.458
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.144 on 3275 degrees of freedom
## Multiple R-squared: 0.007719, Adjusted R-squared: 0.006204
## F-statistic: 5.095 on 5 and 3275 DF, p-value: 0.0001171b. vaxxAttitudes_w1 ~ THREAT * area + sum.media.exposure
- contrast model
m4.cc <- lm(vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_TRexp_w1 + sum.media.exp_w1, data = dw)
summary(m4.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_TRexp_w1 +
## sum.media.exp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.1523 -1.6080 0.2518 1.8447 3.2308
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.022783 0.063019 -0.362 0.71773
## ruralVsu 0.312074 0.105134 2.968 0.00302 **
## subVurb -0.044268 0.096032 -0.461 0.64485
## index_TRexp_w1 -0.070715 0.149431 -0.473 0.63608
## sum.media.exp_w1 0.043607 0.003462 12.597 < 2e-16 ***
## ruralVsu:index_TRexp_w1 0.029707 0.350985 0.085 0.93255
## subVurb:index_TRexp_w1 0.195825 0.321766 0.609 0.54284
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.095 on 3274 degrees of freedom
## Multiple R-squared: 0.05359, Adjusted R-squared: 0.05186
## F-statistic: 30.9 on 6 and 3274 DF, p-value: < 2.2e-16c. vaxxAttitudes_w1 ~ THREAT * ethnicity1
- contrast model
m5.cc <- lm(vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_TRexp_w1, data = dw)
summary(m5.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_TRexp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.4262 -1.6061 0.3169 2.1370 4.1073
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.52048 0.12903 4.034 5.61e-05 ***
## wVb -0.63139 0.13343 -4.732 2.32e-06 ***
## wVa 0.68010 0.15061 4.516 6.54e-06 ***
## wVlx 0.14083 0.14337 0.982 0.326
## wVna -0.69289 0.44513 -1.557 0.120
## wVpa -0.08922 0.59237 -0.151 0.880
## index_TRexp_w1 0.13296 0.39732 0.335 0.738
## wVb:index_TRexp_w1 0.17433 0.38611 0.451 0.652
## wVa:index_TRexp_w1 0.08606 0.57163 0.151 0.880
## wVlx:index_TRexp_w1 -0.03075 0.51354 -0.060 0.952
## wVna:index_TRexp_w1 1.82096 1.44365 1.261 0.207
## wVpa:index_TRexp_w1 0.21926 1.72728 0.127 0.899
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.123 on 3224 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.02373, Adjusted R-squared: 0.0204
## F-statistic: 7.124 on 11 and 3224 DF, p-value: 4.408e-12d. vaxxAttitudes_w1 ~ THREAT * ethnicity1 + sum.media.exposure
- contrast model
m6.cc <- lm(vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_TRexp_w1 + sum.media.exp_w1, data = dw)
summary(m6.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_TRexp_w1 + sum.media.exp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.9500 -1.5884 0.3182 1.7872 3.8352
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.208587 0.136432 -1.529 0.12640
## wVb -0.907360 0.131344 -6.908 5.89e-12 ***
## wVa 0.450186 0.147453 3.053 0.00228 **
## wVlx -0.075065 0.140332 -0.535 0.59275
## wVna -0.815485 0.433015 -1.883 0.05975 .
## wVpa -0.336785 0.576411 -0.584 0.55907
## index_TRexp_w1 0.269788 0.386555 0.698 0.48527
## sum.media.exp_w1 0.047397 0.003481 13.617 < 2e-16 ***
## wVb:index_TRexp_w1 0.080915 0.375583 0.215 0.82944
## wVa:index_TRexp_w1 -0.005272 0.555994 -0.009 0.99243
## wVlx:index_TRexp_w1 -0.234569 0.499681 -0.469 0.63879
## wVna:index_TRexp_w1 2.183595 1.404304 1.555 0.12006
## wVpa:index_TRexp_w1 0.691907 1.680258 0.412 0.68052
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.065 on 3223 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.07684, Adjusted R-squared: 0.07341
## F-statistic: 22.36 on 12 and 3223 DF, p-value: < 2.2e-16e. vaxxAttitudes_w1 ~ THREAT * ethnicity2
- contrast model
m4.cc <- lm(vaxxAttitudes_w1 ~ (aVother + wVother + naVother + lxVother + bVother) * index_AFexp_w1, data = dw)
summary(m4.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_AFexp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.5765 -1.5292 0.3047 1.9134 3.7421
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.3574 0.1317 2.714 0.00668 **
## aVother 0.8997 0.1726 5.212 1.98e-07 ***
## wVother 0.1858 0.1382 1.345 0.17871
## naVother -1.1118 0.4422 -2.514 0.01199 *
## lxVother 0.3972 0.1725 2.302 0.02138 *
## bVother -0.5541 0.1685 -3.288 0.00102 **
## index_AFexp_w1 0.8665 0.4485 1.932 0.05346 .
## aVother:index_AFexp_w1 -0.3566 0.5798 -0.615 0.53852
## wVother:index_AFexp_w1 -0.1749 0.4649 -0.376 0.70687
## naVother:index_AFexp_w1 2.3745 1.7635 1.346 0.17826
## lxVother:index_AFexp_w1 -0.6230 0.5664 -1.100 0.27144
## bVother:index_AFexp_w1 -0.1275 0.5103 -0.250 0.80268
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.114 on 3224 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.03209, Adjusted R-squared: 0.02878
## F-statistic: 9.716 on 11 and 3224 DF, p-value: < 2.2e-16f. vaxxAttitudes_w1 ~ THREAT * ethnicity2 + sum.media.exposure
- contrast model
m4.cc <- lm(vaxxAttitudes_w1 ~ (aVother + wVother + naVother + lxVother + bVother) * index_AFexp_w1 + sum.media.exp_w1, data = dw)
summary(m4.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_AFexp_w1 + sum.media.exp_w1,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.9322 -1.6057 0.2832 1.7577 4.2401
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.362696 0.139127 -2.607 0.00918 **
## aVother 0.856522 0.168091 5.096 3.68e-07 ***
## wVother 0.384433 0.135345 2.840 0.00453 **
## naVother -1.074455 0.430599 -2.495 0.01264 *
## lxVother 0.389751 0.167995 2.320 0.02040 *
## bVother -0.625854 0.164170 -3.812 0.00014 ***
## index_AFexp_w1 0.769940 0.436782 1.763 0.07804 .
## sum.media.exp_w1 0.046330 0.003475 13.333 < 2e-16 ***
## aVother:index_AFexp_w1 -0.200310 0.564616 -0.355 0.72278
## wVother:index_AFexp_w1 -0.214931 0.452708 -0.475 0.63499
## naVother:index_AFexp_w1 2.335349 1.717079 1.360 0.17390
## lxVother:index_AFexp_w1 -0.566956 0.551466 -1.028 0.30398
## bVother:index_AFexp_w1 -0.054830 0.496850 -0.110 0.91213
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.058 on 3223 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.08268, Adjusted R-squared: 0.07926
## F-statistic: 24.21 on 12 and 3223 DF, p-value: < 2.2e-16ii. Wave 2
a. vaxxAttitudes_w2 ~ THREAT * area
- contrast model
m5.cc <- lm(vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_TRexp_w2, data = dw)
summary(m5.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_TRexp_w2,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.7910 -1.4019 -0.0853 1.8750 3.3188
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.33017 0.05111 6.461 1.25e-10 ***
## ruralVsu 0.41021 0.11947 3.433 0.000606 ***
## subVurb 0.12116 0.11095 1.092 0.274906
## index_TRexp_w2 0.05288 0.17769 0.298 0.766044
## ruralVsu:index_TRexp_w2 0.40961 0.41426 0.989 0.322870
## subVurb:index_TRexp_w2 1.20329 0.38739 3.106 0.001917 **
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.088 on 2439 degrees of freedom
## (836 observations deleted due to missingness)
## Multiple R-squared: 0.009197, Adjusted R-squared: 0.007165
## F-statistic: 4.528 on 5 and 2439 DF, p-value: 0.0004117b. vaxxAttitudes_w2 ~ THREAT * area + sum.media.exposure
- contrast model
m6.cc <- lm(vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_TRexp_w2 + sum.media.exp_w2, data = dw)
summary(m6.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_TRexp_w2 +
## sum.media.exp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.7408 -1.3556 0.0087 1.7594 3.3726
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.111678 0.069376 -1.610 0.10758
## ruralVsu 0.268721 0.118456 2.269 0.02338 *
## subVurb 0.026718 0.109557 0.244 0.80735
## index_TRexp_w2 0.064135 0.174701 0.367 0.71357
## sum.media.exp_w2 0.037005 0.004006 9.236 < 2e-16 ***
## ruralVsu:index_TRexp_w2 0.355423 0.407323 0.873 0.38298
## subVurb:index_TRexp_w2 1.149245 0.380911 3.017 0.00258 **
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.053 on 2438 degrees of freedom
## (836 observations deleted due to missingness)
## Multiple R-squared: 0.0427, Adjusted R-squared: 0.04034
## F-statistic: 18.12 on 6 and 2438 DF, p-value: < 2.2e-16c. vaxxAttitudes_w2 ~ THREAT * ethnicity1
- contrast model
m5.cc <- lm(vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_TRexp_w2, data = dw)
summary(m5.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_TRexp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.9866 -1.4168 0.1552 1.6305 3.5801
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.3564 0.1574 2.264 0.0236 *
## wVb -0.6015 0.1523 -3.948 8.09e-05 ***
## wVa 0.3364 0.1607 2.093 0.0365 *
## wVlx 0.1544 0.1794 0.861 0.3893
## wVna 0.2894 0.4937 0.586 0.5579
## wVpa -0.5104 0.7618 -0.670 0.5029
## index_TRexp_w2 0.3060 0.6330 0.483 0.6289
## wVb:index_TRexp_w2 0.6175 0.4511 1.369 0.1712
## wVa:index_TRexp_w2 -0.1041 0.6623 -0.157 0.8751
## wVlx:index_TRexp_w2 0.5286 0.6116 0.864 0.3875
## wVna:index_TRexp_w2 3.5336 2.2608 1.563 0.1182
## wVpa:index_TRexp_w2 -1.2235 2.9090 -0.421 0.6741
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.077 on 2404 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.01805, Adjusted R-squared: 0.01356
## F-statistic: 4.018 on 11 and 2404 DF, p-value: 7.648e-06d. vaxxAttitudes_w2 ~ THREAT * ethnicity1 + sum.media.exposure
- contrast model
m6.cc <- lm(vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_TRexp_w2 + sum.media.exp_w2, data = dw)
summary(m6.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_TRexp_w2 + sum.media.exp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.9749 -1.3633 0.0118 1.7521 3.8895
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.256455 0.165604 -1.549 0.122
## wVb -0.851294 0.151240 -5.629 2.03e-08 ***
## wVa 0.022476 0.160453 0.140 0.889
## wVlx -0.087940 0.177317 -0.496 0.620
## wVna 0.186846 0.483702 0.386 0.699
## wVpa -0.738201 0.746492 -0.989 0.323
## index_TRexp_w2 0.086901 0.620414 0.140 0.889
## sum.media.exp_w2 0.041390 0.004084 10.134 < 2e-16 ***
## wVb:index_TRexp_w2 0.505408 0.442000 1.143 0.253
## wVa:index_TRexp_w2 -0.568713 0.650345 -0.874 0.382
## wVlx:index_TRexp_w2 0.278098 0.599535 0.464 0.643
## wVna:index_TRexp_w2 2.961711 2.215186 1.337 0.181
## wVpa:index_TRexp_w2 -1.599883 2.849608 -0.561 0.575
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.034 on 2403 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.0583, Adjusted R-squared: 0.0536
## F-statistic: 12.4 on 12 and 2403 DF, p-value: < 2.2e-16e. vaxxAttitudes_w2 ~ THREAT * ethnicity2
- contrast model
m5.cc <- lm(vaxxAttitudes_w2 ~ (aVother + wVother + naVother + lxVother + bVother) * index_TRexp_w2, data = dw)
summary(m5.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_TRexp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.9866 -1.4168 0.1552 1.6305 3.5801
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.35638 0.15740 2.264 0.02365 *
## aVother 0.39168 0.19939 1.964 0.04960 *
## wVother 0.05529 0.16435 0.336 0.73662
## naVother 0.34466 0.43016 0.801 0.42308
## lxVother 0.20973 0.20972 1.000 0.31740
## bVother -0.54623 0.19495 -2.802 0.00512 **
## index_TRexp_w2 0.30599 0.63302 0.483 0.62887
## aVother:index_TRexp_w2 -0.66279 0.81594 -0.812 0.41670
## wVother:index_TRexp_w2 -0.55868 0.65429 -0.854 0.39326
## naVother:index_TRexp_w2 2.97491 1.94445 1.530 0.12616
## lxVother:index_TRexp_w2 -0.03010 0.78910 -0.038 0.96958
## bVother:index_TRexp_w2 0.05879 0.71344 0.082 0.93434
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.077 on 2404 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.01805, Adjusted R-squared: 0.01356
## F-statistic: 4.018 on 11 and 2404 DF, p-value: 7.648e-06f. vaxxAttitudes_w2 ~ THREAT * ethnicity2 + sum.media.exposure
- contrast model
m6.cc <- lm(vaxxAttitudes_w2 ~ (aVother + wVother + naVother + lxVother + bVother) * index_TRexp_w2 + sum.media.exp_w2, data = dw)
summary(m6.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_TRexp_w2 + sum.media.exp_w2,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.9749 -1.3633 0.0118 1.7521 3.8895
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.256455 0.165604 -1.549 0.12161
## aVother 0.267162 0.195689 1.365 0.17231
## wVother 0.244686 0.162066 1.510 0.13123
## naVother 0.431531 0.421430 1.024 0.30595
## lxVother 0.156745 0.205491 0.763 0.44567
## bVother -0.606608 0.191048 -3.175 0.00152 **
## index_TRexp_w2 0.086901 0.620414 0.140 0.88862
## sum.media.exp_w2 0.041390 0.004084 10.134 < 2e-16 ***
## aVother:index_TRexp_w2 -0.831483 0.799387 -1.040 0.29837
## wVother:index_TRexp_w2 -0.262770 0.641535 -0.410 0.68214
## naVother:index_TRexp_w2 2.698941 1.904773 1.417 0.15663
## lxVother:index_TRexp_w2 0.015328 0.772928 0.020 0.98418
## bVother:index_TRexp_w2 0.242638 0.699047 0.347 0.72855
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.034 on 2403 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.0583, Adjusted R-squared: 0.0536
## F-statistic: 12.4 on 12 and 2403 DF, p-value: < 2.2e-16D. Analytic - Affect
i. Wave 1
a. vaxxAttitudes_w1 ~ (ANALYTIC - AFFECT) * area
- contrast model
m5.cc <- lm(vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_diffANAF_w1, data = dw)
summary(m5.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_diffANAF_w1,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.9373 -1.6395 0.2831 2.2244 2.9863
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.52309 0.04759 10.992 < 2e-16 ***
## ruralVsu 0.48968 0.11265 4.347 1.42e-05 ***
## subVurb 0.09114 0.10127 0.900 0.368
## index_diffANAF_w1 -0.10312 0.07759 -1.329 0.184
## ruralVsu:index_diffANAF_w1 0.09458 0.18381 0.515 0.607
## subVurb:index_diffANAF_w1 0.20574 0.16491 1.248 0.212
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.144 on 3275 degrees of freedom
## Multiple R-squared: 0.008465, Adjusted R-squared: 0.006951
## F-statistic: 5.592 on 5 and 3275 DF, p-value: 3.89e-05b. vaxxAttitudes_w1 ~ (ANALYTIC - AFFECT) * area + sum.media.exposure
- contrast model
m6.cc <- lm(vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_diffANAF_w1 + sum.media.exp_w1, data = dw)
summary(m6.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_diffANAF_w1 +
## sum.media.exp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.1535 -1.6116 0.2656 1.8268 3.2656
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.044454 0.064699 -0.687 0.49208
## ruralVsu 0.331649 0.110735 2.995 0.00277 **
## subVurb -0.012499 0.099249 -0.126 0.89979
## index_diffANAF_w1 -0.095333 0.075787 -1.258 0.20852
## sum.media.exp_w1 0.043617 0.003459 12.610 < 2e-16 ***
## ruralVsu:index_diffANAF_w1 0.061732 0.179552 0.344 0.73101
## subVurb:index_diffANAF_w1 0.185624 0.161077 1.152 0.24924
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.094 on 3274 degrees of freedom
## Multiple R-squared: 0.05439, Adjusted R-squared: 0.05266
## F-statistic: 31.39 on 6 and 3274 DF, p-value: < 2.2e-16c. vaxxAttitudes_w1 ~ (ANALYTIC - AFFECT) * ethnicity1
- contrast model
m7.cc <- lm(vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_diffANAF_w1, data = dw)
summary(m7.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_diffANAF_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.3324 -1.5754 0.3122 2.1165 3.5157
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.42534 0.14269 2.981 0.0029 **
## wVb -0.69598 0.14191 -4.904 9.84e-07 ***
## wVa 0.73690 0.15047 4.897 1.02e-06 ***
## wVlx 0.16263 0.14845 1.096 0.2734
## wVna -1.16843 0.59779 -1.955 0.0507 .
## wVpa -0.07004 0.56777 -0.123 0.9018
## index_diffANAF_w1 -0.22144 0.24974 -0.887 0.3753
## wVb:index_diffANAF_w1 -0.03222 0.19516 -0.165 0.8689
## wVa:index_diffANAF_w1 0.25005 0.29045 0.861 0.3894
## wVlx:index_diffANAF_w1 0.06868 0.25809 0.266 0.7902
## wVna:index_diffANAF_w1 -0.70741 1.23166 -0.574 0.5658
## wVpa:index_diffANAF_w1 0.14541 0.75609 0.192 0.8475
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.122 on 3224 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.02446, Adjusted R-squared: 0.02113
## F-statistic: 7.349 on 11 and 3224 DF, p-value: 1.506e-12d. vaxxAttitudes_w1 ~ (ANALYTIC - AFFECT) * ethnicity1 + sum.media.exposure
- contrast model
m8.cc <- lm(vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_diffANAF_w1 + sum.media.exp_w1, data = dw)
summary(m8.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_diffANAF_w1 + sum.media.exp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.9409 -1.6130 0.3154 1.7806 4.0516
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.325183 0.149328 -2.178 0.02951 *
## wVb -0.978323 0.139572 -7.009 2.9e-12 ***
## wVa 0.482876 0.147531 3.273 0.00108 **
## wVlx -0.051088 0.145232 -0.352 0.72503
## wVna -1.344546 0.581548 -2.312 0.02084 *
## wVpa -0.344047 0.552576 -0.623 0.53358
## index_diffANAF_w1 -0.227610 0.242892 -0.937 0.34879
## sum.media.exp_w1 0.047370 0.003480 13.612 < 2e-16 ***
## wVb:index_diffANAF_w1 -0.082521 0.189849 -0.435 0.66383
## wVa:index_diffANAF_w1 0.094093 0.282719 0.333 0.73930
## wVlx:index_diffANAF_w1 -0.009851 0.251079 -0.039 0.96871
## wVna:index_diffANAF_w1 -0.744097 1.197904 -0.621 0.53453
## wVpa:index_diffANAF_w1 0.333529 0.735494 0.453 0.65024
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.064 on 3223 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.07749, Adjusted R-squared: 0.07406
## F-statistic: 22.56 on 12 and 3223 DF, p-value: < 2.2e-16e. vaxxAttitudes_w1 ~ (ANALYTIC - AFFECT) * ethnicity2
- contrast model
m5.cc <- lm(vaxxAttitudes_w1 ~ (aVother + wVother + naVother + lxVother + bVother) * index_diffANAF_w1, data = dw)
summary(m5.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_diffANAF_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.3324 -1.5754 0.3122 2.1165 3.5157
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.42534 0.14269 2.981 0.00290 **
## aVother 0.90938 0.18309 4.967 7.16e-07 ***
## wVother 0.17249 0.14930 1.155 0.24805
## naVother -0.99594 0.50662 -1.966 0.04940 *
## lxVother 0.33512 0.18199 1.841 0.06565 .
## bVother -0.52349 0.17848 -2.933 0.00338 **
## index_diffANAF_w1 -0.22144 0.24974 -0.887 0.37532
## aVother:index_diffANAF_w1 0.29596 0.33645 0.880 0.37911
## wVother:index_diffANAF_w1 0.04591 0.26034 0.176 0.86002
## naVother:index_diffANAF_w1 -0.66149 1.03358 -0.640 0.52222
## lxVother:index_diffANAF_w1 0.11460 0.31838 0.360 0.71891
## bVother:index_diffANAF_w1 0.01369 0.28697 0.048 0.96195
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.122 on 3224 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.02446, Adjusted R-squared: 0.02113
## F-statistic: 7.349 on 11 and 3224 DF, p-value: 1.506e-12f. vaxxAttitudes_w1 ~ (ANALYTIC - AFFECT) * ethnicity2 + sum.media.exposure
- contrast model
m6.cc <- lm(vaxxAttitudes_w1 ~ (aVother + wVother + naVother + lxVother + bVother) * index_diffANAF_w1 + sum.media.exp_w1, data = dw)
summary(m6.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_diffANAF_w1 + sum.media.exp_w1,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.9409 -1.6130 0.3154 1.7806 4.0516
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.32518 0.14933 -2.178 0.029505 *
## aVother 0.85540 0.17812 4.802 1.64e-06 ***
## wVother 0.37252 0.14595 2.552 0.010744 *
## naVother -0.97203 0.49274 -1.973 0.048614 *
## lxVother 0.32143 0.17700 1.816 0.069469 .
## bVother -0.60580 0.17369 -3.488 0.000494 ***
## index_diffANAF_w1 -0.22761 0.24289 -0.937 0.348787
## sum.media.exp_w1 0.04737 0.00348 13.612 < 2e-16 ***
## aVother:index_diffANAF_w1 0.16223 0.32738 0.496 0.620241
## wVother:index_diffANAF_w1 0.06814 0.25321 0.269 0.787862
## naVother:index_diffANAF_w1 -0.67596 1.00525 -0.672 0.501361
## lxVother:index_diffANAF_w1 0.05829 0.30968 0.188 0.850712
## bVother:index_diffANAF_w1 -0.01438 0.27911 -0.052 0.958915
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.064 on 3223 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.07749, Adjusted R-squared: 0.07406
## F-statistic: 22.56 on 12 and 3223 DF, p-value: < 2.2e-16ii. Wave 2
a. vaxxAttitudes_w2 ~ (ANALYTIC - AFFECT) * area
- contrast model
m7.cc <- lm(vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_diffANAF_w2, data = dw)
summary(m7.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_diffANAF_w2,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.7734 -1.4198 -0.1309 1.7687 3.1618
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.30911 0.05299 5.834 6.13e-09 ***
## ruralVsu 0.46851 0.12357 3.791 0.000153 ***
## subVurb 0.09101 0.11545 0.788 0.430612
## index_diffANAF_w2 -0.07115 0.09592 -0.742 0.458287
## ruralVsu:index_diffANAF_w2 0.36728 0.22557 1.628 0.103600
## subVurb:index_diffANAF_w2 0.42995 0.20632 2.084 0.037274 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.09 on 2439 degrees of freedom
## (836 observations deleted due to missingness)
## Multiple R-squared: 0.007904, Adjusted R-squared: 0.00587
## F-statistic: 3.886 on 5 and 2439 DF, p-value: 0.001643b. vaxxAttitudes_w2 ~ (ANALYTIC - AFFECT) * area + sum.media.exposure
- contrast model
m8.cc <- lm(vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_diffANAF_w2 + sum.media.exp_w2, data = dw)
summary(m8.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_diffANAF_w2 +
## sum.media.exp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.7585 -1.3726 0.0171 1.7758 3.3472
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.130665 0.070428 -1.855 0.06367 .
## ruralVsu 0.324873 0.122455 2.653 0.00803 **
## subVurb 0.008657 0.113837 0.076 0.93939
## index_diffANAF_w2 -0.049453 0.094319 -0.524 0.60011
## sum.media.exp_w2 0.037192 0.004009 9.277 < 2e-16 ***
## ruralVsu:index_diffANAF_w2 0.337686 0.221757 1.523 0.12794
## subVurb:index_diffANAF_w2 0.449766 0.202825 2.218 0.02668 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.054 on 2438 degrees of freedom
## (836 observations deleted due to missingness)
## Multiple R-squared: 0.04173, Adjusted R-squared: 0.03937
## F-statistic: 17.7 on 6 and 2438 DF, p-value: < 2.2e-16c. vaxxAttitudes_w2 ~ (ANALYTIC - AFFECT) * ethnicity1
- contrast model
m7.cc <- lm(vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_diffANAF_w2, data = dw)
summary(m7.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_diffANAF_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.822 -1.407 0.202 1.686 3.452
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.32828 0.16241 2.021 0.043364 *
## wVb -0.58105 0.16422 -3.538 0.000411 ***
## wVa 0.39631 0.16119 2.459 0.014013 *
## wVlx 0.25832 0.18742 1.378 0.168245
## wVna -0.07814 0.57476 -0.136 0.891873
## wVpa -0.29988 0.73855 -0.406 0.684747
## index_diffANAF_w2 -0.29526 0.30187 -0.978 0.328125
## wVb:index_diffANAF_w2 0.36733 0.24581 1.494 0.135216
## wVa:index_diffANAF_w2 0.22073 0.32710 0.675 0.499867
## wVlx:index_diffANAF_w2 0.59372 0.32400 1.832 0.067005 .
## wVna:index_diffANAF_w2 -0.26011 1.37816 -0.189 0.850318
## wVpa:index_diffANAF_w2 -1.23623 1.07722 -1.148 0.251244
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.076 on 2404 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.01926, Adjusted R-squared: 0.01477
## F-statistic: 4.292 on 11 and 2404 DF, p-value: 2.294e-06d. vaxxAttitudes_w2 ~ (ANALYTIC - AFFECT) * ethnicity1 + sum.media.exposure
- contrast model
m8.cc <- lm(vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_diffANAF_w2 + sum.media.exp_w2, data = dw)
summary(m8.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_diffANAF_w2 + sum.media.exp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.9405 -1.3684 0.0335 1.7479 3.8865
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.286968 0.170395 -1.684 0.0923 .
## wVb -0.849171 0.163064 -5.208 2.08e-07 ***
## wVa 0.079584 0.160999 0.494 0.6211
## wVlx 0.032306 0.184972 0.175 0.8614
## wVna -0.246512 0.563326 -0.438 0.6617
## wVpa -0.513835 0.723843 -0.710 0.4779
## index_diffANAF_w2 -0.386770 0.295871 -1.307 0.1913
## sum.media.exp_w2 0.041205 0.004084 10.090 < 2e-16 ***
## wVb:index_diffANAF_w2 0.263030 0.241036 1.091 0.2753
## wVa:index_diffANAF_w2 -0.019508 0.321335 -0.061 0.9516
## wVlx:index_diffANAF_w2 0.528276 0.317479 1.664 0.0962 .
## wVna:index_diffANAF_w2 -0.718688 1.350911 -0.532 0.5948
## wVpa:index_diffANAF_w2 -1.256200 1.055323 -1.190 0.2340
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.034 on 2403 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.05912, Adjusted R-squared: 0.05442
## F-statistic: 12.58 on 12 and 2403 DF, p-value: < 2.2e-16e. vaxxAttitudes_w2 ~ (ANALYTIC - AFFECT) * ethnicity2
- contrast model
m7.cc <- lm(vaxxAttitudes_w2 ~ (aVother + wVother + naVother + lxVother + bVother) * index_diffANAF_w2, data = dw)
summary(m7.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_diffANAF_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.822 -1.407 0.202 1.686 3.452
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.32828 0.16241 2.021 0.0434 *
## aVother 0.44705 0.20327 2.199 0.0280 *
## wVother 0.05074 0.16958 0.299 0.7648
## naVother -0.02740 0.49420 -0.055 0.9558
## lxVother 0.30906 0.21775 1.419 0.1559
## bVother -0.53031 0.20488 -2.588 0.0097 **
## index_diffANAF_w2 -0.29526 0.30187 -0.978 0.3281
## aVother:index_diffANAF_w2 0.27315 0.39223 0.696 0.4862
## wVother:index_diffANAF_w2 0.05243 0.31580 0.166 0.8682
## naVother:index_diffANAF_w2 -0.20768 1.16135 -0.179 0.8581
## lxVother:index_diffANAF_w2 0.64615 0.39051 1.655 0.0981 .
## bVother:index_diffANAF_w2 0.41975 0.35043 1.198 0.2311
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.076 on 2404 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.01926, Adjusted R-squared: 0.01477
## F-statistic: 4.292 on 11 and 2404 DF, p-value: 2.294e-06f. vaxxAttitudes_w2 ~ (ANALYTIC - AFFECT) * ethnicity2 + sum.media.exposure
- contrast model
m8.cc <- lm(vaxxAttitudes_w2 ~ (aVother + wVother + naVother + lxVother + bVother) * index_diffANAF_w2 + sum.media.exp_w2, data = dw)
summary(m8.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_diffANAF_w2 + sum.media.exp_w2,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.9405 -1.3684 0.0335 1.7479 3.8865
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.286968 0.170395 -1.684 0.09228 .
## aVother 0.329189 0.199481 1.650 0.09903 .
## wVother 0.249604 0.167297 1.492 0.13584
## naVother 0.003093 0.484163 0.006 0.99490
## lxVother 0.281910 0.213343 1.321 0.18649
## bVother -0.599566 0.200837 -2.985 0.00286 **
## index_diffANAF_w2 -0.386770 0.295871 -1.307 0.19126
## sum.media.exp_w2 0.041205 0.004084 10.090 < 2e-16 ***
## aVother:index_diffANAF_w2 0.181007 0.384369 0.471 0.63774
## wVother:index_diffANAF_w2 0.200515 0.309731 0.647 0.51745
## naVother:index_diffANAF_w2 -0.518173 1.138159 -0.455 0.64895
## lxVother:index_diffANAF_w2 0.728791 0.382663 1.905 0.05696 .
## bVother:index_diffANAF_w2 0.463545 0.343331 1.350 0.17710
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.034 on 2403 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.05912, Adjusted R-squared: 0.05442
## F-statistic: 12.58 on 12 and 2403 DF, p-value: < 2.2e-16E. Analytic - Threat
i. Wave 1
a. vaxxAttitudes_w1 ~ (ANALYTIC - THREAT) * area
- contrast model
m7.cc <- lm(vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_diffANTR_w1, data = dw)
summary(m7.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_diffANTR_w1,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.2209 -1.5824 0.2962 2.0779 3.3260
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.57728 0.04022 14.353 < 2e-16 ***
## ruralVsu 0.43398 0.09401 4.616 4.06e-06 ***
## subVurb 0.03636 0.08734 0.416 0.677
## index_diffANTR_w1 0.96535 0.21791 4.430 9.73e-06 ***
## ruralVsu:index_diffANTR_w1 -0.21208 0.51725 -0.410 0.682
## subVurb:index_diffANTR_w1 0.21890 0.46160 0.474 0.635
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.138 on 3275 degrees of freedom
## Multiple R-squared: 0.01363, Adjusted R-squared: 0.01212
## F-statistic: 9.048 on 5 and 3275 DF, p-value: 1.485e-08b. vaxxAttitudes_w1 ~ (ANALYTIC - THREAT) * area + sum.media.exposure
- contrast model
m8.cc <- lm(vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_diffANTR_w1 + sum.media.exp_w1, data = dw)
summary(m8.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (ruralVsu + subVurb) * index_diffANTR_w1 +
## sum.media.exp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.1152 -1.6342 0.2559 1.8151 3.2451
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.018485 0.060694 0.305 0.76072
## ruralVsu 0.296682 0.092689 3.201 0.00138 **
## subVurb -0.061814 0.085854 -0.720 0.47158
## index_diffANTR_w1 0.618579 0.215149 2.875 0.00406 **
## sum.media.exp_w1 0.042265 0.003495 12.094 < 2e-16 ***
## ruralVsu:index_diffANTR_w1 -0.262986 0.506167 -0.520 0.60340
## subVurb:index_diffANTR_w1 0.230222 0.451689 0.510 0.61030
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.092 on 3274 degrees of freedom
## Multiple R-squared: 0.05581, Adjusted R-squared: 0.05408
## F-statistic: 32.25 on 6 and 3274 DF, p-value: < 2.2e-16c. vaxxAttitudes_w1 ~ (ANALYTIC - THREAT) * ethnicity1
- contrast model
m9.cc <- lm(vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_diffANTR_w1, data = dw)
summary(m9.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_diffANTR_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.6865 -1.5818 0.3004 1.9916 4.0108
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.4571 0.1236 3.697 0.000222 ***
## wVb -0.6638 0.1108 -5.992 2.3e-09 ***
## wVa 0.6211 0.1340 4.636 3.7e-06 ***
## wVlx 0.1194 0.1338 0.893 0.372119
## wVna -1.1653 0.4458 -2.614 0.008987 **
## wVpa -0.2015 0.5584 -0.361 0.718183
## index_diffANTR_w1 -0.2448 0.8076 -0.303 0.761867
## wVb:index_diffANTR_w1 -0.4358 0.5823 -0.748 0.454267
## wVa:index_diffANTR_w1 0.9848 0.7380 1.334 0.182152
## wVlx:index_diffANTR_w1 -0.6437 0.7301 -0.882 0.378017
## wVna:index_diffANTR_w1 -3.8327 2.1570 -1.777 0.075690 .
## wVpa:index_diffANTR_w1 -3.4353 4.2004 -0.818 0.413510
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.115 on 3224 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.03105, Adjusted R-squared: 0.02774
## F-statistic: 9.392 on 11 and 3224 DF, p-value: < 2.2e-16d. vaxxAttitudes_w1 ~ (ANALYTIC - THREAT) * ethnicity1 + sum.media.exposure
- contrast model
m10.cc <- lm(vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_diffANTR_w1 + sum.media.exp_w1, data = dw)
summary(m10.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_diffANTR_w1 + sum.media.exp_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.0595 -1.6053 0.3067 1.7717 4.3213
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.278431 0.133022 -2.093 0.03642 *
## wVb -0.913417 0.109643 -8.331 < 2e-16 ***
## wVa 0.425359 0.131453 3.236 0.00123 **
## wVlx -0.067078 0.131162 -0.511 0.60910
## wVna -1.410290 0.434894 -3.243 0.00120 **
## wVpa -0.469085 0.544675 -0.861 0.38918
## index_diffANTR_w1 -0.561308 0.787542 -0.713 0.47606
## sum.media.exp_w1 0.045901 0.003513 13.065 < 2e-16 ***
## wVb:index_diffANTR_w1 -0.400673 0.567601 -0.706 0.48030
## wVa:index_diffANTR_w1 0.653643 0.719752 0.908 0.36387
## wVlx:index_diffANTR_w1 -0.612187 0.711653 -0.860 0.38973
## wVna:index_diffANTR_w1 -4.612287 2.103251 -2.193 0.02838 *
## wVpa:index_diffANTR_w1 -2.183689 4.095195 -0.533 0.59391
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.062 on 3223 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.07978, Adjusted R-squared: 0.07636
## F-statistic: 23.29 on 12 and 3223 DF, p-value: < 2.2e-16e. vaxxAttitudes_w1 ~ (ANALYTIC - THREAT) * ethnicity2
- contrast model
m7.cc <- lm(vaxxAttitudes_w1 ~ (aVother + wVother + naVother + lxVother + bVother) * index_diffANTR_w1, data = dw)
summary(m7.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_diffANTR_w1, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.6865 -1.5818 0.3004 1.9916 4.0108
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.4571 0.1236 3.697 0.000222 ***
## aVother 0.8361 0.1609 5.197 2.15e-07 ***
## wVother 0.2150 0.1291 1.665 0.095911 .
## naVother -0.9503 0.3826 -2.484 0.013052 *
## lxVother 0.3344 0.1608 2.080 0.037572 *
## bVother -0.4487 0.1486 -3.019 0.002555 **
## index_diffANTR_w1 -0.2448 0.8076 -0.303 0.761867
## aVother:index_diffANTR_w1 2.2119 0.9882 2.238 0.025273 *
## wVother:index_diffANTR_w1 1.2271 0.8312 1.476 0.139976
## naVother:index_diffANTR_w1 -2.6055 1.9275 -1.352 0.176548
## lxVother:index_diffANTR_w1 0.5834 0.9843 0.593 0.553456
## bVother:index_diffANTR_w1 0.7913 0.9163 0.864 0.387890
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.115 on 3224 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.03105, Adjusted R-squared: 0.02774
## F-statistic: 9.392 on 11 and 3224 DF, p-value: < 2.2e-16f. vaxxAttitudes_w1 ~ (ANALYTIC - THREAT) * ethnicity2 + sum.media.exposure
- contrast model
m8.cc <- lm(vaxxAttitudes_w1 ~ (aVother + wVother + naVother + lxVother + bVother) * index_diffANTR_w1 + sum.media.exp_w1, data = dw)
summary(m8.cc)##
## Call:
## lm(formula = vaxxAttitudes_w1 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_diffANTR_w1 + sum.media.exp_w1,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.0595 -1.6053 0.3067 1.7717 4.3213
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.278431 0.133022 -2.093 0.036416 *
## aVother 0.831111 0.156801 5.300 1.23e-07 ***
## wVother 0.405752 0.126675 3.203 0.001373 **
## naVother -1.004538 0.372944 -2.694 0.007107 **
## lxVother 0.338674 0.156683 2.162 0.030728 *
## bVother -0.507665 0.144940 -3.503 0.000467 ***
## index_diffANTR_w1 -0.561308 0.787542 -0.713 0.476062
## sum.media.exp_w1 0.045901 0.003513 13.065 < 2e-16 ***
## aVother:index_diffANTR_w1 1.846175 0.963625 1.916 0.055471 .
## wVother:index_diffANTR_w1 1.192532 0.810199 1.472 0.141145
## naVother:index_diffANTR_w1 -3.419755 1.879754 -1.819 0.068965 .
## lxVother:index_diffANTR_w1 0.580346 0.959419 0.605 0.545293
## bVother:index_diffANTR_w1 0.791859 0.893102 0.887 0.375340
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.062 on 3223 degrees of freedom
## (45 observations deleted due to missingness)
## Multiple R-squared: 0.07978, Adjusted R-squared: 0.07636
## F-statistic: 23.29 on 12 and 3223 DF, p-value: < 2.2e-16ii. Wave 2
a. vaxxAttitudes_w2 ~ (ANALYTIC - THREAT) * area
- contrast model
m9.cc <- lm(vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_diffANTR_w2, data = dw)
summary(m9.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_diffANTR_w2,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.8042 -1.4274 -0.0999 1.8741 3.0666
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.33129 0.04569 7.251 5.53e-13 ***
## ruralVsu 0.37050 0.10589 3.499 0.000475 ***
## subVurb -0.05487 0.10051 -0.546 0.585139
## index_diffANTR_w2 0.06531 0.27676 0.236 0.813482
## ruralVsu:index_diffANTR_w2 0.53188 0.65216 0.816 0.414820
## subVurb:index_diffANTR_w2 -1.00609 0.59337 -1.696 0.090098 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.091 on 2439 degrees of freedom
## (836 observations deleted due to missingness)
## Multiple R-squared: 0.007155, Adjusted R-squared: 0.00512
## F-statistic: 3.516 on 5 and 2439 DF, p-value: 0.003603b. vaxxAttitudes_w2 ~ (ANALYTIC - THREAT) * area + sum.media.exposure
- contrast model
m10.cc <- lm(vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_diffANTR_w2 + sum.media.exp_w2, data = dw)
summary(m10.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (ruralVsu + subVurb) * index_diffANTR_w2 +
## sum.media.exp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.8125 -1.3900 -0.0319 1.7880 3.3204
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.116781 0.066183 -1.765 0.0778 .
## ruralVsu 0.232099 0.105185 2.207 0.0274 *
## subVurb -0.144795 0.099299 -1.458 0.1449
## index_diffANTR_w2 -0.096161 0.272679 -0.353 0.7244
## sum.media.exp_w2 0.037074 0.004021 9.219 <2e-16 ***
## ruralVsu:index_diffANTR_w2 0.453878 0.641263 0.708 0.4791
## subVurb:index_diffANTR_w2 -1.011192 0.583410 -1.733 0.0832 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.055 on 2438 degrees of freedom
## (836 observations deleted due to missingness)
## Multiple R-squared: 0.0406, Adjusted R-squared: 0.03824
## F-statistic: 17.2 on 6 and 2438 DF, p-value: < 2.2e-16c. vaxxAttitudes_w2 ~ (ANALYTIC - THREAT) * ethnicity1
- contrast model
m9.cc <- lm(vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_diffANTR_w2, data = dw)
summary(m9.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_diffANTR_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.1424 -1.4421 0.1086 1.6089 3.5432
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.3894 0.1648 2.364 0.0182 *
## wVb -0.6549 0.1336 -4.900 1.02e-06 ***
## wVa 0.3450 0.1482 2.328 0.0200 *
## wVlx 0.1164 0.1610 0.723 0.4694
## wVna -0.3267 0.5224 -0.625 0.5318
## wVpa 0.2041 0.8056 0.253 0.8000
## index_diffANTR_w2 -1.2666 0.8849 -1.431 0.1525
## wVb:index_diffANTR_w2 1.3586 0.7899 1.720 0.0856 .
## wVa:index_diffANTR_w2 1.8940 0.8926 2.122 0.0339 *
## wVlx:index_diffANTR_w2 1.3748 0.9646 1.425 0.1542
## wVna:index_diffANTR_w2 -4.4641 3.8609 -1.156 0.2477
## wVpa:index_diffANTR_w2 -6.3102 3.3626 -1.877 0.0607 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.073 on 2404 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.02147, Adjusted R-squared: 0.01699
## F-statistic: 4.794 on 11 and 2404 DF, p-value: 2.442e-07d. vaxxAttitudes_w2 ~ (ANALYTIC - THREAT) * ethnicity1 + sum.media.exposure
- contrast model
m10.cc <- lm(vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) * index_diffANTR_w2 + sum.media.exp_w2, data = dw)
summary(m10.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (wVb + wVa + wVlx + wVna + wVpa) *
## index_diffANTR_w2 + sum.media.exp_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.977 -1.344 -0.010 1.751 3.887
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.20979 0.17212 -1.219 0.2230
## wVb -0.89596 0.13313 -6.730 2.12e-11 ***
## wVa 0.07823 0.14766 0.530 0.5963
## wVlx -0.08902 0.15903 -0.560 0.5757
## wVna -0.40100 0.51194 -0.783 0.4335
## wVpa -0.01119 0.78970 -0.014 0.9887
## index_diffANTR_w2 -1.46340 0.86732 -1.687 0.0917 .
## sum.media.exp_w2 0.04098 0.00408 10.044 < 2e-16 ***
## wVb:index_diffANTR_w2 1.14417 0.77428 1.478 0.1396
## wVa:index_diffANTR_w2 1.50778 0.87541 1.722 0.0851 .
## wVlx:index_diffANTR_w2 1.44206 0.94516 1.526 0.1272
## wVna:index_diffANTR_w2 -4.73947 3.78322 -1.253 0.2104
## wVpa:index_diffANTR_w2 -5.96262 3.29500 -1.810 0.0705 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.032 on 2403 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.06089, Adjusted R-squared: 0.0562
## F-statistic: 12.98 on 12 and 2403 DF, p-value: < 2.2e-16e. vaxxAttitudes_w2 ~ (ANALYTIC - THREAT) * ethnicity2
- contrast model
m9.cc <- lm(vaxxAttitudes_w2 ~ (aVother + wVother + naVother + lxVother + bVother) * index_diffANTR_w2, data = dw)
summary(m9.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_diffANTR_w2, data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.1424 -1.4421 0.1086 1.6089 3.5432
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.38944 0.16477 2.364 0.01818 *
## aVother 0.39770 0.20017 1.987 0.04706 *
## wVother 0.05266 0.16993 0.310 0.75669
## naVother -0.27405 0.45537 -0.602 0.54735
## lxVother 0.16911 0.20662 0.818 0.41317
## bVother -0.60222 0.19320 -3.117 0.00185 **
## index_diffANTR_w2 -1.26661 0.88493 -1.431 0.15247
## aVother:index_diffANTR_w2 2.91846 1.11894 2.608 0.00916 **
## wVother:index_diffANTR_w2 1.02447 0.91938 1.114 0.26526
## naVother:index_diffANTR_w2 -3.43962 3.26476 -1.054 0.29219
## lxVother:index_diffANTR_w2 2.39932 1.15809 2.072 0.03839 *
## bVother:index_diffANTR_w2 2.38309 1.06624 2.235 0.02551 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.073 on 2404 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.02147, Adjusted R-squared: 0.01699
## F-statistic: 4.794 on 11 and 2404 DF, p-value: 2.442e-07f. vaxxAttitudes_w2 ~ (ANALYTIC - THREAT) * ethnicity2 + sum.media.exposure
- contrast model
m10.cc <- lm(vaxxAttitudes_w2 ~ (aVother + wVother + naVother + lxVother + bVother) * index_diffANTR_w2 + sum.media.exp_w2, data = dw)
summary(m10.cc)##
## Call:
## lm(formula = vaxxAttitudes_w2 ~ (aVother + wVother + naVother +
## lxVother + bVother) * index_diffANTR_w2 + sum.media.exp_w2,
## data = dw)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.977 -1.344 -0.010 1.751 3.887
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -0.20979 0.17212 -1.219 0.223015
## aVother 0.29805 0.19639 1.518 0.129237
## wVother 0.21982 0.16734 1.314 0.189093
## naVother -0.18118 0.44629 -0.406 0.684804
## lxVother 0.13080 0.20249 0.646 0.518358
## bVother -0.67613 0.18945 -3.569 0.000365 ***
## index_diffANTR_w2 -1.46340 0.86732 -1.687 0.091682 .
## sum.media.exp_w2 0.04098 0.00408 10.044 < 2e-16 ***
## aVother:index_diffANTR_w2 2.60913 1.09683 2.379 0.017447 *
## wVother:index_diffANTR_w2 1.10135 0.90089 1.223 0.221637
## naVother:index_diffANTR_w2 -3.63812 3.19904 -1.137 0.255546
## lxVother:index_diffANTR_w2 2.54340 1.13485 2.241 0.025106 *
## bVother:index_diffANTR_w2 2.24552 1.04485 2.149 0.031724 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.032 on 2403 degrees of freedom
## (865 observations deleted due to missingness)
## Multiple R-squared: 0.06089, Adjusted R-squared: 0.0562
## F-statistic: 12.98 on 12 and 2403 DF, p-value: < 2.2e-16