Мне нужно провести анализ различий в университетах (экономика), и я новичок в т.
Мне нужно выяснить на примерах Венгрии и Турции, если вступление в Европейский Союз увеличивает политические участие или нет. У меня есть данные до и после вступления Венгрии в Европейский Союз.
Я очищал свои данные, пока у меня осталось только 3 переменные (год, страна и участие в политической жизни).
Мой код идет следующим образом:
#DID
##
#create dummy variable to set year
Data$year = ifelse(Data$year >= 2008, 1, 0)
#dummy variable group
Data$treated <- ifelse(Data$country == "Hungary", 1, 0)
#interaction bedtween time and treatment
Data$did <- Data$year * Data$treated
didreg1 = lm(pol ~ treated*year, data = Data)
summary(didreg1)
И он возвращает это:
lm(formula = pol ~ country * year, data = Data)
Residuals:
Min 1Q Median 3Q Max
-1.72649 -0.44759 0.04877 0.55241 1.05241
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 2.451230 0.020920 117.169 <2e-16 ***
country 0.275262 0.030974 8.887 <2e-16 ***
year -0.003637 0.025642 -0.142 0.887
country:year -0.059278 0.039000 -1.520 0.129
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.7183 on 6021 degrees of freedom
Multiple R-squared: 0.02705, Adjusted R-squared: 0.02657
F-statistic: 55.8 on 3 and 6021 DF, p-value: < 2.2e-16
Итак, мой код работает, но я не уверен, как интерпретировать результаты. (Обратите внимание, что значения в данных обратные: наибольшее значение имеет политическое участие (1)).