Adding bayes analysis

This commit is contained in:
Alex Gebben Work 2025-09-25 17:06:01 -06:00
parent 6162487b95
commit 8c924532e2

View File

@ -74,8 +74,6 @@ print(forecast_results)
plot(forecast_results)
?forecast
?forecast
install.packages("sparsegl")
plot(VAR1)
@ -85,10 +83,23 @@ plot(VAR1)
#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
ggplot(data=DF) +geom_point(aes(x=Year,y=WY_POP),color="red")+geom_point(aes(x=Year,y=30*LINC_POP),color="blue")+geom_point(aes(x=Year,y=LINC_GDP/1700),color="black")+geom_point(aes(x=Year,y=LINC_PRIV_IND/1),color="green")+geom_point(aes(x=Year,y=LINC_LABOR_FORCE/20),color="orange")
RES
ggplot(data=RES) +geom_point(aes(x=YEAR,y=WY_POP),color="red")+geom_point(aes(x=YEAR,y=30*LN_POP),color="blue")+geom_point(aes(x=YEAR,y=LN_GDP/1700),color="black")+geom_point(aes(x=YEAR,y=LN_LABOR_FORCE/20),color="orange")
itial information and data that will be required from Kemmerer-Diamondville Water &
Wastewater Joint Powers Board includes names of key stakeholders that can be interviewed
regarding future developments, new businesses, and business closures.
version
install.packages("pbkrtest")
install.packages("bayesPop")
library("bayesMig")
help("bayesPop")
library(bayesMig)
?mig.predict
example(mig.predict)
mig.predict(51)
library("bayesPop")
example(bayesMig)
?bayesMig