First-2

library(wooldridge)
library(rmarkdown)
data(mroz)

reg <-lm(wage ~ educ,data = mroz)

summary(reg)

Call:
lm(formula = wage ~ educ, data = mroz)

Residuals:
    Min      1Q  Median      3Q     Max 
-5.6797 -1.6658 -0.4556  0.8794 21.1487 

Coefficients:
            Estimate Std. Error t value Pr(>|t|)    
(Intercept) -2.09237    0.84829  -2.467    0.014 *  
educ         0.49531    0.06595   7.511 3.49e-13 ***
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

Residual standard error: 3.114 on 426 degrees of freedom
  (325 пропущенных наблюдений удалены)
Multiple R-squared:  0.1169,    Adjusted R-squared:  0.1149 
F-statistic: 56.41 on 1 and 426 DF,  p-value: 3.486e-13