Added idea

This commit is contained in:
Alex 2025-08-29 18:29:47 -06:00
parent e87f5d1ba4
commit 60127fb003

View File

@ -78,6 +78,7 @@ DF <- LINC_POP %>% left_join(WY_POP) %>% left_join(LINC_PRIV_IND) %>% left_join(
DF %>% select(LINC_POP,WY_POP)
DF <- DF %>% mutate(WY_POP=WY_POP-LINC_POP)
#Check a VAR it looks like lags on changes to Private industry could affect other variables
#Idea check a SVAR placing limits on which shocks are first
feols((LINC_POP)~(WY_POP)+log(LINC_PRIV_IND)+Year,data=DF)
feols(log(1000*LINC_POP)~log(LINC_GDP)+log(LINC_PRIV_IND)+log(LINC_LABOR_FORCE)+log(LINC_PRIV_IND)+Year,DF)
DF