diff --git a/ARMA_Pop.r b/ARMA_Pop.r
index b60a2c6..163d1ce 100644
--- a/ARMA_Pop.r
+++ b/ARMA_Pop.r
@@ -8,7 +8,7 @@ DF <- FRED_GET('WYLINC3POP','LN_POP') %>% select(-YEAR)
 TS <- 1000*ts(DF,start=c(1970),end=c(2024),frequency=1)
 BC <- BoxCox.lambda(TS)
 MODEL <- auto.arima(TS, lambda = BC)
-
+forecast(MODEL,h=20)
 plot(forecast(MODEL,h=35),main="Lincoln County Population Forecast")
 
 #####Plan and ideas
@@ -20,3 +20,5 @@ plot(forecast(MODEL,h=35),main="Lincoln County Population Forecast")
 #6) Compare to the ARMA percentile
 #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
+
+###Seperate out Kemmer and Diamondville? http://eadiv.state.wy.us/pop/wyc&sc40.htm