##
## Call:
## lm(formula = GDP_Growth ~ Unemployment, data = econ_data)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.85922 -0.57902 -0.09237 0.51814 2.05523
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 15.25856 0.53845 28.34 <2e-16 ***
## Unemployment -2.28227 0.09495 -24.04 <2e-16 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.9381 on 22 degrees of freedom
## Multiple R-squared: 0.9633, Adjusted R-squared: 0.9616
## F-statistic: 577.7 on 1 and 22 DF, p-value: < 2.2e-16
## Estimated Okun's Coefficient: 2.28
##
## R-squared: 0.963
##
## Adjusted R-squared: 0.962