Added a note
This commit is contained in:
parent
5122fe26b6
commit
60b66b9ccf
@ -8,7 +8,7 @@ DF <- FRED_GET('WYLINC3POP','LN_POP') %>% select(-YEAR)
|
|||||||
TS <- 1000*ts(DF,start=c(1970),end=c(2024),frequency=1)
|
TS <- 1000*ts(DF,start=c(1970),end=c(2024),frequency=1)
|
||||||
BC <- BoxCox.lambda(TS)
|
BC <- BoxCox.lambda(TS)
|
||||||
MODEL <- auto.arima(TS, lambda = BC)
|
MODEL <- auto.arima(TS, lambda = BC)
|
||||||
|
forecast(MODEL,h=20)
|
||||||
plot(forecast(MODEL,h=35),main="Lincoln County Population Forecast")
|
plot(forecast(MODEL,h=35),main="Lincoln County Population Forecast")
|
||||||
|
|
||||||
#####Plan and ideas
|
#####Plan and ideas
|
||||||
@ -20,3 +20,5 @@ plot(forecast(MODEL,h=35),main="Lincoln County Population Forecast")
|
|||||||
#6) Compare to the ARMA percentile
|
#6) Compare to the ARMA percentile
|
||||||
#7) Adjust the ARMA up assuming some of these outputs are known.
|
#7) Adjust the ARMA up assuming some of these outputs are known.
|
||||||
####Other ideas, develop larger plan? Maybe look at decline in other industries as a proportion of employment
|
####Other ideas, develop larger plan? Maybe look at decline in other industries as a proportion of employment
|
||||||
|
|
||||||
|
###Seperate out Kemmer and Diamondville? http://eadiv.state.wy.us/pop/wyc&sc40.htm
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user