In this study, the DPES constructs were related to several related constructs, excluding the Big Five. The following regressions examine to what extent each of the DPES subscales predicts other psychological constructs.
Sample size: 148
Gender breakdown:
0.6223776, 0.3706294, 0.006993
Mean age: 19.524
# Anxiety
ecr_r_anx <- lm(ECR_Rom_Anx ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(ecr_r_anx)##
## Call:
## lm(formula = ECR_Rom_Anx ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -2.5528 -0.7163 -0.1088 0.7055 3.1253
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 3.99463 0.68515 5.830 3.74e-08 ***
## DPES_R_Pride -0.18908 0.17169 -1.101 0.2727
## DPES_R_Content -0.29568 0.10838 -2.728 0.0072 **
## DPES_R_NL -0.02404 0.14394 -0.167 0.8676
## DPES_R_Amuse -0.13323 0.10996 -1.212 0.2277
## DPES_R_Awe 0.30813 0.11948 2.579 0.0110 *
## DPES_R_Enthus 0.08277 0.15364 0.539 0.5910
## DPES_R_AL 0.25031 0.17501 1.430 0.1549
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.091 on 138 degrees of freedom
## (2 observations deleted due to missingness)
## Multiple R-squared: 0.1432, Adjusted R-squared: 0.09976
## F-statistic: 3.295 on 7 and 138 DF, p-value: 0.00285# Avoidance
ecr_r_avo <- lm(ECR_Rom_Avoid ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(ecr_r_avo)##
## Call:
## lm(formula = ECR_Rom_Avoid ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.6728 -0.7553 -0.1948 0.6980 2.7545
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 5.2805573 0.6333676 8.337 6.9e-14 ***
## DPES_R_Pride -0.2187357 0.1587132 -1.378 0.17038
## DPES_R_Content -0.1874743 0.1001893 -1.871 0.06343 .
## DPES_R_NL 0.0935311 0.1330619 0.703 0.48329
## DPES_R_Amuse -0.0003373 0.1016499 -0.003 0.99736
## DPES_R_Awe 0.2386173 0.1104487 2.160 0.03247 *
## DPES_R_Enthus 0.1206699 0.1420317 0.850 0.39702
## DPES_R_AL -0.4309053 0.1617796 -2.664 0.00865 **
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.009 on 138 degrees of freedom
## (2 observations deleted due to missingness)
## Multiple R-squared: 0.1496, Adjusted R-squared: 0.1065
## F-statistic: 3.469 on 7 and 138 DF, p-value: 0.001873# Anxiety
ecr_f_anx <- lm(ECR_F_Anx ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(ecr_f_anx)##
## Call:
## lm(formula = ECR_F_Anx ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.4707 -0.5113 -0.1130 0.4951 1.6988
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 3.47125 0.45372 7.651 2.93e-12 ***
## DPES_R_Pride -0.10025 0.11359 -0.883 0.378973
## DPES_R_Content -0.40087 0.07170 -5.591 1.14e-07 ***
## DPES_R_NL 0.05451 0.09297 0.586 0.558578
## DPES_R_Amuse -0.02403 0.07266 -0.331 0.741320
## DPES_R_Awe 0.26252 0.07794 3.368 0.000977 ***
## DPES_R_Enthus 0.11455 0.10123 1.132 0.259761
## DPES_R_AL 0.18277 0.11504 1.589 0.114365
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.723 on 140 degrees of freedom
## Multiple R-squared: 0.2905, Adjusted R-squared: 0.255
## F-statistic: 8.188 on 7 and 140 DF, p-value: 2.405e-08# Avoidance
ecr_f_avo <- lm(ECR_F_Avoid ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(ecr_f_avo)##
## Call:
## lm(formula = ECR_F_Avoid ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.35548 -0.56385 -0.02609 0.49129 1.92631
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 6.78606 0.47759 14.209 < 2e-16 ***
## DPES_R_Pride 0.04370 0.11957 0.366 0.71527
## DPES_R_Content -0.13088 0.07548 -1.734 0.08512 .
## DPES_R_NL 0.07591 0.09786 0.776 0.43925
## DPES_R_Amuse -0.13526 0.07648 -1.768 0.07916 .
## DPES_R_Awe -0.07298 0.08204 -0.890 0.37522
## DPES_R_Enthus -0.10056 0.10656 -0.944 0.34697
## DPES_R_AL -0.39906 0.12109 -3.296 0.00124 **
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.761 on 140 degrees of freedom
## Multiple R-squared: 0.3769, Adjusted R-squared: 0.3457
## F-statistic: 12.1 on 7 and 140 DF, p-value: 5.056e-12rse <- lm(RSE ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(rse)##
## Call:
## lm(formula = RSE ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.40217 -0.32323 0.03748 0.34843 1.09597
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.66640 0.34796 4.789 4.40e-06 ***
## DPES_R_Pride 0.09967 0.08498 1.173 0.2429
## DPES_R_Content 0.38734 0.05261 7.362 1.69e-11 ***
## DPES_R_NL -0.14210 0.06986 -2.034 0.0439 *
## DPES_R_Amuse 0.11436 0.05323 2.148 0.0335 *
## DPES_R_Awe -0.10723 0.05779 -1.856 0.0657 .
## DPES_R_Enthus -0.03712 0.07423 -0.500 0.6178
## DPES_R_AL 0.05035 0.08541 0.589 0.5565
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5212 on 133 degrees of freedom
## (7 observations deleted due to missingness)
## Multiple R-squared: 0.4648, Adjusted R-squared: 0.4366
## F-statistic: 16.5 on 7 and 133 DF, p-value: 1.576e-15# Personal Control
sph_ctl_per <- lm(SphCont_Per ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(sph_ctl_per)##
## Call:
## lm(formula = SphCont_Per ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.87538 -0.29032 0.03262 0.25802 1.38377
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.43814 0.34951 6.976 1.29e-10 ***
## DPES_R_Pride 0.19782 0.08188 2.416 0.0171 *
## DPES_R_Content 0.08237 0.05154 1.598 0.1124
## DPES_R_NL -0.02408 0.06788 -0.355 0.7233
## DPES_R_Amuse 0.03363 0.05179 0.649 0.5172
## DPES_R_Awe -0.04216 0.05963 -0.707 0.4808
## DPES_R_Enthus -0.07326 0.07223 -1.014 0.3123
## DPES_R_AL 0.03873 0.08126 0.477 0.6345
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5002 on 133 degrees of freedom
## (7 observations deleted due to missingness)
## Multiple R-squared: 0.1329, Adjusted R-squared: 0.08727
## F-statistic: 2.912 on 7 and 133 DF, p-value: 0.007249# Interpersonal Control
sph_ctl_interp <- lm(SphCont_Interp ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(sph_ctl_interp)##
## Call:
## lm(formula = SphCont_Interp ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.27803 -0.31580 0.02673 0.36013 1.45195
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.14641 0.36662 5.855 3.59e-08 ***
## DPES_R_Pride 0.01816 0.09129 0.199 0.842646
## DPES_R_Content 0.20148 0.05862 3.437 0.000787 ***
## DPES_R_NL -0.10016 0.07514 -1.333 0.184786
## DPES_R_Amuse 0.13783 0.05785 2.383 0.018608 *
## DPES_R_Awe -0.05637 0.06475 -0.871 0.385552
## DPES_R_Enthus -0.04579 0.08039 -0.570 0.569904
## DPES_R_AL 0.07188 0.09190 0.782 0.435548
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5597 on 132 degrees of freedom
## (8 observations deleted due to missingness)
## Multiple R-squared: 0.2112, Adjusted R-squared: 0.1693
## F-statistic: 5.048 on 7 and 132 DF, p-value: 4.263e-05# Overall Scale
ndstr_all <- lm(NeedStr_sum ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(ndstr_all)##
## Call:
## lm(formula = NeedStr_sum ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.22184 -0.30420 0.04289 0.28257 1.02374
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.303911 0.316991 7.268 2.86e-11 ***
## DPES_R_Pride 0.149804 0.074274 2.017 0.0457 *
## DPES_R_Content -0.002258 0.046483 -0.049 0.9613
## DPES_R_NL -0.014470 0.061299 -0.236 0.8137
## DPES_R_Amuse -0.106221 0.046706 -2.274 0.0246 *
## DPES_R_Awe -0.040634 0.053778 -0.756 0.4512
## DPES_R_Enthus 0.059789 0.065147 0.918 0.3604
## DPES_R_AL 0.054520 0.073308 0.744 0.4584
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.4511 on 132 degrees of freedom
## (8 observations deleted due to missingness)
## Multiple R-squared: 0.1055, Adjusted R-squared: 0.05802
## F-statistic: 2.223 on 7 and 132 DF, p-value: 0.0362# Desire for Structure
ndstr_des <- lm(NeedStr_DesireFor ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(ndstr_des)##
## Call:
## lm(formula = NeedStr_DesireFor ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.15199 -0.37845 0.02399 0.37101 1.28707
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.45494 0.32850 7.473 8.85e-12 ***
## DPES_R_Pride 0.02455 0.08177 0.300 0.7645
## DPES_R_Content 0.06318 0.05087 1.242 0.2163
## DPES_R_NL -0.05779 0.06743 -0.857 0.3930
## DPES_R_Amuse -0.10054 0.05171 -1.945 0.0539 .
## DPES_R_Awe 0.04906 0.05777 0.849 0.3972
## DPES_R_Enthus 0.07967 0.07191 1.108 0.2699
## DPES_R_AL 0.05721 0.08087 0.707 0.4806
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5043 on 135 degrees of freedom
## (5 observations deleted due to missingness)
## Multiple R-squared: 0.08024, Adjusted R-squared: 0.03254
## F-statistic: 1.682 on 7 and 135 DF, p-value: 0.1183# Response to Lack of Structure
ndstr_resp <- lm(NeedStr_RespLack ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(ndstr_resp)##
## Call:
## lm(formula = NeedStr_RespLack ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.52434 -0.40275 0.03246 0.41674 1.25177
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.294714 0.432963 5.300 4.73e-07 ***
## DPES_R_Pride 0.209511 0.101447 2.065 0.0409 *
## DPES_R_Content -0.053560 0.063489 -0.844 0.4004
## DPES_R_NL -0.002535 0.083725 -0.030 0.9759
## DPES_R_Amuse -0.102461 0.063794 -1.606 0.1106
## DPES_R_Awe -0.071251 0.073453 -0.970 0.3338
## DPES_R_Enthus 0.051112 0.088981 0.574 0.5667
## DPES_R_AL 0.049961 0.100127 0.499 0.6186
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.6162 on 132 degrees of freedom
## (8 observations deleted due to missingness)
## Multiple R-squared: 0.0813, Adjusted R-squared: 0.03258
## F-statistic: 1.669 on 7 and 132 DF, p-value: 0.122BID <- lm(BID ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(BID)##
## Call:
## lm(formula = BID ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.37241 -0.36984 0.04847 0.36866 1.33769
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 3.568218 0.364203 9.797 < 2e-16 ***
## DPES_R_Pride 0.087911 0.086200 1.020 0.3097
## DPES_R_Content 0.248326 0.053433 4.647 8.29e-06 ***
## DPES_R_NL 0.019988 0.074406 0.269 0.7886
## DPES_R_Amuse 0.083195 0.055536 1.498 0.1366
## DPES_R_Awe -0.142748 0.059968 -2.380 0.0188 *
## DPES_R_Enthus 0.001681 0.077873 0.022 0.9828
## DPES_R_AL -0.177156 0.089776 -1.973 0.0506 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5261 on 127 degrees of freedom
## (13 observations deleted due to missingness)
## Multiple R-squared: 0.2507, Adjusted R-squared: 0.2094
## F-statistic: 6.071 on 7 and 127 DF, p-value: 4.008e-06ndcog <- lm(NeedCog_score ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(ndcog)##
## Call:
## lm(formula = NeedCog_score ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.95096 -0.32270 -0.02642 0.33106 1.42844
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.81229 0.37355 7.529 7.6e-12 ***
## DPES_R_Pride 0.24880 0.09283 2.680 0.008314 **
## DPES_R_Content -0.02329 0.05834 -0.399 0.690392
## DPES_R_NL 0.03993 0.07682 0.520 0.604066
## DPES_R_Amuse 0.10479 0.05886 1.780 0.077346 .
## DPES_R_Awe 0.05301 0.06558 0.808 0.420304
## DPES_R_Enthus -0.30791 0.08165 -3.771 0.000246 ***
## DPES_R_AL -0.04208 0.09278 -0.454 0.650899
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5699 on 130 degrees of freedom
## (10 observations deleted due to missingness)
## Multiple R-squared: 0.1326, Adjusted R-squared: 0.08589
## F-statistic: 2.839 on 7 and 130 DF, p-value: 0.008698# Affiliative
hum_aff <- lm(HumStyle_Aff ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(hum_aff)##
## Call:
## lm(formula = HumStyle_Aff ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.55179 -0.34106 0.04527 0.41806 1.15152
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.601600 0.394228 4.063 8.28e-05 ***
## DPES_R_Pride 0.075983 0.091895 0.827 0.40982
## DPES_R_Content -0.026092 0.057019 -0.458 0.64799
## DPES_R_NL -0.060906 0.075221 -0.810 0.41957
## DPES_R_Amuse 0.174240 0.057773 3.016 0.00307 **
## DPES_R_Awe -0.050503 0.064328 -0.785 0.43381
## DPES_R_Enthus -0.001989 0.080803 -0.025 0.98040
## DPES_R_AL 0.275009 0.091028 3.021 0.00302 **
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5608 on 132 degrees of freedom
## (8 observations deleted due to missingness)
## Multiple R-squared: 0.2566, Adjusted R-squared: 0.2172
## F-statistic: 6.508 on 7 and 132 DF, p-value: 1.341e-06# Self Defeating
hum_selfdef <- lm(HumStyle_SelfDef ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(hum_selfdef)##
## Call:
## lm(formula = HumStyle_SelfDef ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.49839 -0.57822 0.02695 0.45212 1.98435
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.981101 0.478936 6.224 6.16e-09 ***
## DPES_R_Pride -0.048717 0.118220 -0.412 0.68096
## DPES_R_Content -0.224069 0.073395 -3.053 0.00275 **
## DPES_R_NL 0.101106 0.097680 1.035 0.30256
## DPES_R_Amuse -0.001617 0.074741 -0.022 0.98277
## DPES_R_Awe 0.052257 0.082829 0.631 0.52921
## DPES_R_Enthus 0.071742 0.103232 0.695 0.48832
## DPES_R_AL -0.008464 0.118157 -0.072 0.94301
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.719 on 130 degrees of freedom
## (10 observations deleted due to missingness)
## Multiple R-squared: 0.09146, Adjusted R-squared: 0.04254
## F-statistic: 1.87 on 7 and 130 DF, p-value: 0.0796SWL <- lm(SWL_sum ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(SWL)##
## Call:
## lm(formula = SWL_sum ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.9526 -0.4168 0.0864 0.4919 3.5165
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.45278 0.48092 3.021 0.00301 **
## DPES_R_Pride -0.05864 0.11955 -0.491 0.62456
## DPES_R_Content 0.42371 0.07430 5.703 7.04e-08 ***
## DPES_R_NL 0.13607 0.09893 1.375 0.17125
## DPES_R_Amuse 0.04543 0.07608 0.597 0.55142
## DPES_R_Awe -0.04508 0.08503 -0.530 0.59689
## DPES_R_Enthus 0.10968 0.10573 1.037 0.30139
## DPES_R_AL -0.23558 0.11913 -1.977 0.05001 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.7429 on 136 degrees of freedom
## (4 observations deleted due to missingness)
## Multiple R-squared: 0.2976, Adjusted R-squared: 0.2614
## F-statistic: 8.231 on 7 and 136 DF, p-value: 2.381e-08# Positivity
PANAS_pos <- lm(PANAS_pos ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(PANAS_pos)##
## Call:
## lm(formula = PANAS_pos ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.39497 -0.21138 0.03509 0.31605 1.14257
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.83713 0.32596 2.568 0.0113 *
## DPES_R_Pride 0.10026 0.07534 1.331 0.1856
## DPES_R_Content 0.21083 0.04719 4.467 1.69e-05 ***
## DPES_R_NL 0.10944 0.06275 1.744 0.0835 .
## DPES_R_Amuse 0.04064 0.04962 0.819 0.4143
## DPES_R_Awe -0.04603 0.05094 -0.904 0.3679
## DPES_R_Enthus 0.04267 0.06615 0.645 0.5200
## DPES_R_AL 0.04815 0.07775 0.619 0.5368
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.4619 on 131 degrees of freedom
## (9 observations deleted due to missingness)
## Multiple R-squared: 0.4293, Adjusted R-squared: 0.3988
## F-statistic: 14.08 on 7 and 131 DF, p-value: 1.564e-13# Negativity
PANAS_neg <- lm(PANAS_neg ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(PANAS_neg)##
## Call:
## lm(formula = PANAS_neg ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.59486 -0.39441 -0.06378 0.38251 1.52303
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.58714 0.40665 6.362 3.07e-09 ***
## DPES_R_Pride -0.01981 0.09580 -0.207 0.8365
## DPES_R_Content -0.24847 0.05995 -4.145 6.07e-05 ***
## DPES_R_NL 0.04581 0.07869 0.582 0.5614
## DPES_R_Amuse -0.13798 0.06253 -2.206 0.0291 *
## DPES_R_Awe 0.12974 0.06483 2.001 0.0474 *
## DPES_R_Enthus 0.02061 0.08395 0.245 0.8065
## DPES_R_AL 0.16678 0.09736 1.713 0.0891 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5851 on 131 degrees of freedom
## (9 observations deleted due to missingness)
## Multiple R-squared: 0.2399, Adjusted R-squared: 0.1993
## F-statistic: 5.906 on 7 and 131 DF, p-value: 5.596e-06# Overall Behavioral Inhibition
bis_sum <- lm(BIS_sum ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(bis_sum)##
## Call:
## lm(formula = BIS_sum ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -0.96807 -0.24282 0.00281 0.17998 2.14160
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.193886 0.245549 8.935 2.43e-15 ***
## DPES_R_Pride -0.024752 0.061614 -0.402 0.6885
## DPES_R_Content -0.072645 0.038273 -1.898 0.0598 .
## DPES_R_NL 0.104983 0.050745 2.069 0.0404 *
## DPES_R_Amuse 0.018921 0.038772 0.488 0.6263
## DPES_R_Awe -0.003816 0.042268 -0.090 0.9282
## DPES_R_Enthus -0.033506 0.054169 -0.619 0.5372
## DPES_R_AL 0.092294 0.061694 1.496 0.1370
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.3848 on 137 degrees of freedom
## (3 observations deleted due to missingness)
## Multiple R-squared: 0.1192, Adjusted R-squared: 0.07419
## F-statistic: 2.649 on 7 and 137 DF, p-value: 0.0134# Behavioral Activation: Reward Responsiveness
bas_rewResp <- lm(BAS_RewResp_sum ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(bas_rewResp)##
## Call:
## lm(formula = BAS_RewResp_sum ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -7.7636 -1.1763 -0.2357 1.2831 9.9811
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 6.97942 1.29449 5.392 2.97e-07 ***
## DPES_R_Pride 0.19555 0.32482 0.602 0.5481
## DPES_R_Content -0.08156 0.20177 -0.404 0.6867
## DPES_R_NL 0.08188 0.26752 0.306 0.7600
## DPES_R_Amuse 0.20871 0.20440 1.021 0.3090
## DPES_R_Awe -0.11478 0.22283 -0.515 0.6073
## DPES_R_Enthus 0.40457 0.28557 1.417 0.1588
## DPES_R_AL 0.81310 0.32524 2.500 0.0136 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.028 on 137 degrees of freedom
## (3 observations deleted due to missingness)
## Multiple R-squared: 0.2757, Adjusted R-squared: 0.2386
## F-statistic: 7.448 on 7 and 137 DF, p-value: 1.392e-07# Behavioral Activation: Drive
bas_drive <- lm(BAS_Drive_sum ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(bas_drive)##
## Call:
## lm(formula = BAS_Drive_sum ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -7.8834 -1.4543 0.2615 1.2841 9.4245
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 6.73844 1.46044 4.614 8.98e-06 ***
## DPES_R_Pride 0.07682 0.36646 0.210 0.8343
## DPES_R_Content -0.02266 0.22764 -0.100 0.9208
## DPES_R_NL -0.01776 0.30182 -0.059 0.9532
## DPES_R_Amuse 0.41286 0.23060 1.790 0.0756 .
## DPES_R_Awe -0.12159 0.25139 -0.484 0.6294
## DPES_R_Enthus 0.50308 0.32218 1.561 0.1207
## DPES_R_AL -0.09576 0.36693 -0.261 0.7945
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.288 on 137 degrees of freedom
## (3 observations deleted due to missingness)
## Multiple R-squared: 0.0889, Adjusted R-squared: 0.04234
## F-statistic: 1.91 on 7 and 137 DF, p-value: 0.07249# Behavioral Activation: Fun Seeking
bas_fun <- lm(BAS_FunSeek_sum ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(bas_fun)##
## Call:
## lm(formula = BAS_FunSeek_sum ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.5563 -1.1364 0.0664 1.0762 8.4143
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 5.10066 1.26781 4.023 9.45e-05 ***
## DPES_R_Pride -0.41908 0.31812 -1.317 0.1899
## DPES_R_Content -0.05903 0.19761 -0.299 0.7656
## DPES_R_NL -0.12611 0.26200 -0.481 0.6310
## DPES_R_Amuse 0.86500 0.20018 4.321 2.96e-05 ***
## DPES_R_Awe -0.03608 0.21823 -0.165 0.8689
## DPES_R_Enthus 0.53565 0.27968 1.915 0.0576 .
## DPES_R_AL 0.44761 0.31853 1.405 0.1622
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.987 on 137 degrees of freedom
## (3 observations deleted due to missingness)
## Multiple R-squared: 0.2662, Adjusted R-squared: 0.2287
## F-statistic: 7.101 on 7 and 137 DF, p-value: 3.108e-07# Value: Conformity
shw_conform <- lm(Shw_Conformity ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(shw_conform)##
## Call:
## lm(formula = Shw_Conformity ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.8918 -0.5525 0.0350 0.5606 1.3895
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.128539 0.471524 4.514 1.37e-05 ***
## DPES_R_Pride 0.203205 0.117623 1.728 0.0863 .
## DPES_R_Content 0.009898 0.073283 0.135 0.8928
## DPES_R_NL 0.153849 0.097029 1.586 0.1152
## DPES_R_Amuse 0.023677 0.074813 0.316 0.7521
## DPES_R_Awe 0.002731 0.083361 0.033 0.9739
## DPES_R_Enthus 0.003866 0.103890 0.037 0.9704
## DPES_R_AL -0.185424 0.116826 -1.587 0.1148
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.7275 on 135 degrees of freedom
## (5 observations deleted due to missingness)
## Multiple R-squared: 0.0896, Adjusted R-squared: 0.0424
## F-statistic: 1.898 on 7 and 135 DF, p-value: 0.07447# Value: Self Direction
shw_selfd <- lm(Shw_SelfDirection ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(shw_selfd)##
## Call:
## lm(formula = Shw_SelfDirection ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.84711 -0.25828 0.00389 0.34524 1.39510
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.52414 0.35517 4.291 3.37e-05 ***
## DPES_R_Pride 0.20593 0.08860 2.324 0.02160 *
## DPES_R_Content -0.07193 0.05520 -1.303 0.19476
## DPES_R_NL -0.12291 0.07309 -1.682 0.09494 .
## DPES_R_Amuse 0.12249 0.05635 2.174 0.03147 *
## DPES_R_Awe 0.07091 0.06279 1.129 0.26076
## DPES_R_Enthus -0.04002 0.07825 -0.511 0.60989
## DPES_R_AL 0.23812 0.08800 2.706 0.00769 **
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.548 on 135 degrees of freedom
## (5 observations deleted due to missingness)
## Multiple R-squared: 0.3055, Adjusted R-squared: 0.2694
## F-statistic: 8.482 on 7 and 135 DF, p-value: 1.39e-08# Value: Achievement
shw_ach <- lm(Shw_Achievement ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(shw_ach)##
## Call:
## lm(formula = Shw_Achievement ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.55941 -0.41914 0.03228 0.42579 1.38040
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.68831 0.38561 4.378 2.38e-05 ***
## DPES_R_Pride 0.33973 0.09619 3.532 0.000565 ***
## DPES_R_Content -0.11656 0.05993 -1.945 0.053857 .
## DPES_R_NL -0.18580 0.07935 -2.342 0.020668 *
## DPES_R_Amuse 0.07085 0.06118 1.158 0.248902
## DPES_R_Awe 0.10762 0.06817 1.579 0.116749
## DPES_R_Enthus 0.08040 0.08496 0.946 0.345680
## DPES_R_AL 0.07243 0.09554 0.758 0.449730
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5949 on 135 degrees of freedom
## (5 observations deleted due to missingness)
## Multiple R-squared: 0.2855, Adjusted R-squared: 0.2485
## F-statistic: 7.706 on 7 and 135 DF, p-value: 8.007e-08# Value: Traditions
shw_trad <- lm(Shw_Traditions ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(shw_trad)##
## Call:
## lm(formula = Shw_Traditions ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.89775 -0.51399 0.05566 0.58219 1.65610
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.16485 0.48418 4.471 1.63e-05 ***
## DPES_R_Pride 0.01854 0.12078 0.154 0.878
## DPES_R_Content 0.01641 0.07525 0.218 0.828
## DPES_R_NL 0.02089 0.09963 0.210 0.834
## DPES_R_Amuse -0.05941 0.07682 -0.773 0.441
## DPES_R_Awe 0.03102 0.08560 0.362 0.718
## DPES_R_Enthus 0.09510 0.10668 0.891 0.374
## DPES_R_AL 0.05876 0.11996 0.490 0.625
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.747 on 135 degrees of freedom
## (5 observations deleted due to missingness)
## Multiple R-squared: 0.04998, Adjusted R-squared: 0.0007173
## F-statistic: 1.015 on 7 and 135 DF, p-value: 0.4239# Value: Stimulation
shw_stim <- lm(Shw_Stimulation ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(shw_stim)##
## Call:
## lm(formula = Shw_Stimulation ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.97036 -0.55583 0.03319 0.53036 2.19764
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.32634 0.47301 2.804 0.00579 **
## DPES_R_Pride -0.02531 0.11799 -0.215 0.83046
## DPES_R_Content -0.09650 0.07351 -1.313 0.19152
## DPES_R_NL -0.10108 0.09733 -1.038 0.30091
## DPES_R_Amuse 0.19158 0.07505 2.553 0.01180 *
## DPES_R_Awe 0.18299 0.08362 2.188 0.03037 *
## DPES_R_Enthus 0.11881 0.10422 1.140 0.25628
## DPES_R_AL 0.16890 0.11719 1.441 0.15183
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.7298 on 135 degrees of freedom
## (5 observations deleted due to missingness)
## Multiple R-squared: 0.2431, Adjusted R-squared: 0.2038
## F-statistic: 6.194 on 7 and 135 DF, p-value: 2.686e-06# Value: Security
shw_sec <- lm(Shw_Security ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(shw_sec)##
## Call:
## lm(formula = Shw_Security ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.46914 -0.30268 0.02657 0.42024 1.69877
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.22347 0.37160 5.984 1.85e-08 ***
## DPES_R_Pride 0.13530 0.09270 1.460 0.1467
## DPES_R_Content -0.03226 0.05775 -0.559 0.5773
## DPES_R_NL 0.01496 0.07647 0.196 0.8452
## DPES_R_Amuse -0.06640 0.05896 -1.126 0.2621
## DPES_R_Awe 0.01263 0.06570 0.192 0.8479
## DPES_R_Enthus -0.00417 0.08187 -0.051 0.9595
## DPES_R_AL 0.18874 0.09207 2.050 0.0423 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5733 on 135 degrees of freedom
## (5 observations deleted due to missingness)
## Multiple R-squared: 0.1504, Adjusted R-squared: 0.1064
## F-statistic: 3.415 on 7 and 135 DF, p-value: 0.002161# Value: Benevolence
shw_ben <- lm(Shw_Benevolence ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(shw_ben)##
## Call:
## lm(formula = Shw_Benevolence ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -2.5109 -0.2470 0.1068 0.3946 1.2500
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.92688 0.39422 2.351 0.0202 *
## DPES_R_Pride 0.07859 0.09834 0.799 0.4256
## DPES_R_Content 0.03795 0.06127 0.619 0.5367
## DPES_R_NL 0.19128 0.08112 2.358 0.0198 *
## DPES_R_Amuse 0.05074 0.06255 0.811 0.4187
## DPES_R_Awe -0.02720 0.06969 -0.390 0.6969
## DPES_R_Enthus -0.03640 0.08686 -0.419 0.6758
## DPES_R_AL 0.23936 0.09767 2.451 0.0155 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.6082 on 135 degrees of freedom
## (5 observations deleted due to missingness)
## Multiple R-squared: 0.3482, Adjusted R-squared: 0.3144
## F-statistic: 10.3 on 7 and 135 DF, p-value: 2.618e-10# Value: Power
shw_power <- lm(Shw_Power ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(shw_power)##
## Call:
## lm(formula = Shw_Power ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.97027 -0.45241 -0.01874 0.51571 2.27536
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.62353 0.54056 4.853 3.3e-06 ***
## DPES_R_Pride -0.01931 0.13484 -0.143 0.8863
## DPES_R_Content -0.01421 0.08401 -0.169 0.8659
## DPES_R_NL -0.11240 0.11123 -1.010 0.3141
## DPES_R_Amuse -0.03030 0.08577 -0.353 0.7244
## DPES_R_Awe 0.14886 0.09557 1.558 0.1216
## DPES_R_Enthus 0.24430 0.11910 2.051 0.0422 *
## DPES_R_AL -0.07942 0.13393 -0.593 0.5542
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.834 on 135 degrees of freedom
## (5 observations deleted due to missingness)
## Multiple R-squared: 0.06893, Adjusted R-squared: 0.02065
## F-statistic: 1.428 on 7 and 135 DF, p-value: 0.1991# Value: Hedonism
shw_hed <- lm(Shw_Hedonism ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(shw_hed)##
## Call:
## lm(formula = Shw_Hedonism ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.67275 -0.32913 0.04815 0.43534 1.09834
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.7877996 0.3826955 2.059 0.04146 *
## DPES_R_Pride 0.1120702 0.0954643 1.174 0.24248
## DPES_R_Content 0.0068799 0.0594776 0.116 0.90808
## DPES_R_NL -0.1315936 0.0787502 -1.671 0.09703 .
## DPES_R_Amuse 0.1381080 0.0607194 2.275 0.02451 *
## DPES_R_Awe -0.0007538 0.0676571 -0.011 0.99113
## DPES_R_Enthus 0.0890177 0.0843188 1.056 0.29298
## DPES_R_AL 0.3149706 0.0948172 3.322 0.00115 **
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5905 on 135 degrees of freedom
## (5 observations deleted due to missingness)
## Multiple R-squared: 0.3659, Adjusted R-squared: 0.3331
## F-statistic: 11.13 on 7 and 135 DF, p-value: 4.562e-11# Value: Universalism
shw_uni <- lm(Shw_Universalism ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=f11.dat)
summary(shw_uni)##
## Call:
## lm(formula = Shw_Universalism ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = f11.dat)
##
## Residuals:
## Min 1Q Median 3Q Max
## -2.16346 -0.29374 0.04169 0.42726 1.24284
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.63378 0.40458 4.038 8.98e-05 ***
## DPES_R_Pride 0.04314 0.10092 0.427 0.6698
## DPES_R_Content -0.08812 0.06288 -1.401 0.1634
## DPES_R_NL 0.19796 0.08325 2.378 0.0188 *
## DPES_R_Amuse 0.08325 0.06419 1.297 0.1969
## DPES_R_Awe 0.09533 0.07153 1.333 0.1848
## DPES_R_Enthus -0.10972 0.08914 -1.231 0.2205
## DPES_R_AL 0.13774 0.10024 1.374 0.1717
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.6242 on 135 degrees of freedom
## (5 observations deleted due to missingness)
## Multiple R-squared: 0.2462, Adjusted R-squared: 0.2071
## F-statistic: 6.299 on 7 and 135 DF, p-value: 2.097e-06In another sample, the DPES scales were related to the Big Five personality dimensions. I also included a scale related to relationship goals by Crocker and Canevello that I became interested in back in 2011.
Sample size: 122
Gender breakdown:
0.3238095, 0.6571429, 0.0190476
Mean age: 34.284
# Extraversion
bfi_ext <- lm(BFI_Extrav ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=dpes_wBFI)
summary(bfi_ext)##
## Call:
## lm(formula = BFI_Extrav ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = dpes_wBFI)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.60109 -0.56621 -0.00264 0.45057 1.66797
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.04426 0.59414 1.758 0.0818 .
## DPES_R_Pride 0.03050 0.12634 0.241 0.8097
## DPES_R_Content 0.02683 0.10332 0.260 0.7956
## DPES_R_NL -0.04263 0.12689 -0.336 0.7376
## DPES_R_Amuse 0.02214 0.12577 0.176 0.8606
## DPES_R_Awe -0.13838 0.10859 -1.274 0.2055
## DPES_R_Enthus 0.14544 0.14169 1.026 0.3071
## DPES_R_AL 0.31374 0.13381 2.345 0.0210 *
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.7187 on 101 degrees of freedom
## (13 observations deleted due to missingness)
## Multiple R-squared: 0.1623, Adjusted R-squared: 0.1042
## F-statistic: 2.795 on 7 and 101 DF, p-value: 0.01063# Agreeableness
bfi_agr <- lm(BFI_Agree ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=dpes_wBFI)
summary(bfi_agr)##
## Call:
## lm(formula = BFI_Agree ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = dpes_wBFI)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.52282 -0.30158 0.01609 0.38338 1.29462
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.29522 0.47073 4.876 4.09e-06 ***
## DPES_R_Pride -0.15583 0.10375 -1.502 0.13625
## DPES_R_Content 0.25016 0.08299 3.014 0.00326 **
## DPES_R_NL -0.06952 0.10304 -0.675 0.50146
## DPES_R_Amuse 0.19841 0.10109 1.963 0.05246 .
## DPES_R_Awe -0.10203 0.08625 -1.183 0.23965
## DPES_R_Enthus 0.09753 0.11214 0.870 0.38654
## DPES_R_AL 0.06589 0.10653 0.619 0.53763
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5692 on 100 degrees of freedom
## (14 observations deleted due to missingness)
## Multiple R-squared: 0.2424, Adjusted R-squared: 0.1894
## F-statistic: 4.571 on 7 and 100 DF, p-value: 0.0001833# Conscientiousness
bfi_cons <- lm(BFI_Consc ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=dpes_wBFI)
summary(bfi_cons)##
## Call:
## lm(formula = BFI_Consc ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = dpes_wBFI)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.20046 -0.48151 -0.01974 0.43673 1.93873
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.55083 0.51071 4.995 2.44e-06 ***
## DPES_R_Pride -0.02316 0.11089 -0.209 0.8350
## DPES_R_Content 0.23210 0.09115 2.546 0.0124 *
## DPES_R_NL -0.13071 0.11300 -1.157 0.2501
## DPES_R_Amuse 0.01510 0.10994 0.137 0.8910
## DPES_R_Awe -0.16347 0.09461 -1.728 0.0870 .
## DPES_R_Enthus 0.17766 0.12227 1.453 0.1493
## DPES_R_AL 0.12151 0.11591 1.048 0.2970
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.6291 on 102 degrees of freedom
## (12 observations deleted due to missingness)
## Multiple R-squared: 0.1962, Adjusted R-squared: 0.1411
## F-statistic: 3.557 on 7 and 102 DF, p-value: 0.001837# Neuroticism
bfi_neur <- lm(BFI_Neurot ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=dpes_wBFI)
summary(bfi_neur)##
## Call:
## lm(formula = BFI_Neurot ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = dpes_wBFI)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.54797 -0.44400 0.08204 0.47422 1.57650
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 3.947724 0.595888 6.625 1.72e-09 ***
## DPES_R_Pride 0.161233 0.127586 1.264 0.2092
## DPES_R_Content -0.454266 0.107723 -4.217 5.41e-05 ***
## DPES_R_NL 0.253795 0.131906 1.924 0.0572 .
## DPES_R_Amuse -0.169700 0.126494 -1.342 0.1827
## DPES_R_Awe -0.005094 0.109209 -0.047 0.9629
## DPES_R_Enthus 0.226986 0.142457 1.593 0.1142
## DPES_R_AL -0.212741 0.133326 -1.596 0.1137
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.7231 on 101 degrees of freedom
## (13 observations deleted due to missingness)
## Multiple R-squared: 0.2814, Adjusted R-squared: 0.2315
## F-statistic: 5.649 on 7 and 101 DF, p-value: 1.604e-05# Openness
bfi_open <- lm(BFI_Open ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=dpes_wBFI)
summary(bfi_open)##
## Call:
## lm(formula = BFI_Open ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL +
## DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data = dpes_wBFI)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.30246 -0.33021 0.01152 0.36331 1.64151
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.587168 0.448951 5.763 9.58e-08 ***
## DPES_R_Pride 0.008245 0.101935 0.081 0.9357
## DPES_R_Content -0.111934 0.081979 -1.365 0.1753
## DPES_R_NL -0.205985 0.097455 -2.114 0.0371 *
## DPES_R_Amuse 0.060308 0.096865 0.623 0.5350
## DPES_R_Awe 0.047739 0.082643 0.578 0.5648
## DPES_R_Enthus 0.222361 0.108320 2.053 0.0428 *
## DPES_R_AL 0.193295 0.101823 1.898 0.0606 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.5451 on 98 degrees of freedom
## (16 observations deleted due to missingness)
## Multiple R-squared: 0.2033, Adjusted R-squared: 0.1464
## F-statistic: 3.572 on 7 and 98 DF, p-value: 0.00183# Relationship Goal: Compassion
rg_comp <- lm(RelGoal_Compassion ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=dpes_wBFI)
summary(rg_comp)##
## Call:
## lm(formula = RelGoal_Compassion ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = dpes_wBFI)
##
## Residuals:
## Min 1Q Median 3Q Max
## -2.54939 -0.50634 0.06918 0.52740 1.56753
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.02143 0.63672 1.604 0.1118
## DPES_R_Pride -0.06961 0.13700 -0.508 0.6125
## DPES_R_Content 0.02712 0.11353 0.239 0.8117
## DPES_R_NL 0.17690 0.13873 1.275 0.2052
## DPES_R_Amuse 0.28060 0.13858 2.025 0.0455 *
## DPES_R_Awe -0.03889 0.12010 -0.324 0.7468
## DPES_R_Enthus 0.07326 0.14887 0.492 0.6237
## DPES_R_AL 0.03183 0.14643 0.217 0.8283
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.7974 on 102 degrees of freedom
## (12 observations deleted due to missingness)
## Multiple R-squared: 0.1757, Adjusted R-squared: 0.1192
## F-statistic: 3.107 on 7 and 102 DF, p-value: 0.005184# Relationship Goal: Self Image
rg_si <- lm(RelGoal_SelfImage ~ DPES_R_Pride + DPES_R_Content + DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL, data=dpes_wBFI)
summary(rg_si)##
## Call:
## lm(formula = RelGoal_SelfImage ~ DPES_R_Pride + DPES_R_Content +
## DPES_R_NL + DPES_R_Amuse + DPES_R_Awe + DPES_R_Enthus + DPES_R_AL,
## data = dpes_wBFI)
##
## Residuals:
## Min 1Q Median 3Q Max
## -2.25359 -0.37454 0.02375 0.48220 1.41419
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.1840 0.6224 1.902 0.0599 .
## DPES_R_Pride 0.1010 0.1333 0.758 0.4502
## DPES_R_Content -0.2453 0.1109 -2.212 0.0292 *
## DPES_R_NL 0.2129 0.1359 1.566 0.1203
## DPES_R_Amuse 0.0560 0.1343 0.417 0.6775
## DPES_R_Awe -0.1125 0.1167 -0.964 0.3375
## DPES_R_Enthus 0.1165 0.1473 0.791 0.4306
## DPES_R_AL 0.1565 0.1469 1.066 0.2891
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.7786 on 103 degrees of freedom
## (11 observations deleted due to missingness)
## Multiple R-squared: 0.1156, Adjusted R-squared: 0.05551
## F-statistic: 1.924 on 7 and 103 DF, p-value: 0.07318
Social/Political Control