6 New Playground
6.0.1 Variable Inflation Factors (VIF)
mathquiz phobia
1.086652 1.086652 fit_ihno_lm_5 <- lm(statquiz ~ mathquiz*phobia*reason, # additional interaction
data = data_ihno_fitting)
texreg::screenreg(fit_ihno_lm_5)
=====================================================
Model 1
-----------------------------------------------------
(Intercept) 5.87 *
(2.26)
mathquiz 0.05
(0.08)
phobia -0.46
(0.54)
reasonPersonal interest -0.04
(2.61)
reasonAdvisor recommendation 0.23
(2.85)
mathquiz:phobia 0.01
(0.02)
mathquiz:reasonPersonal interest 0.00
(0.09)
mathquiz:reasonAdvisor recommendation -0.01
(0.10)
phobia:reasonPersonal interest -0.58
(0.72)
phobia:reasonAdvisor recommendation 0.32
(0.64)
mathquiz:phobia:reasonPersonal interest 0.02
(0.03)
mathquiz:phobia:reasonAdvisor recommendation -0.02
(0.02)
-----------------------------------------------------
R^2 0.39
Adj. R^2 0.30
Num. obs. 85
=====================================================
*** p < 0.001; ** p < 0.01; * p < 0.05