pacman::p_load(fixest,modelsummary)
regression1 <- feols(data = data_full,
fml = total_spending ~ Income )
regression2 <- feols(data = data_full,
fml = total_spending ~ Income + Kidhome)
modelsummary(list(regression1,regression2),
stars = TRUE,
gof_map = c('nobs','r.squared'))
(1) | (2) | |
---|---|---|
(Intercept) | −556.823*** | −299.119*** |
(21.654) | (28.069) | |
Income | 0.022*** | 0.019*** |
(0.000) | (0.000) | |
Kidhome | −230.610*** | |
(16.945) | ||
Num.Obs. | 2000 | 2000 |
R2 | 0.629 | 0.661 |
+ p < 0.1, * p < 0.05, ** p < 0.01, *** p < 0.001 |