我有一個樣本數據預測值來了相同中的R
Sno period year_quarter country city sales_revenue 1 1/1/2009 2009-Q1 Argentina Buenos Aires 3008 2 1/4/2009 2009-Q2 Argentina Buenos Aires 3244 3 1/7/2009 2009-Q3 Argentina Buenos Aires 8000 4 1/10/2009 2009-Q4 Argentina Buenos Aires 8719 5 1/1/2010 2010-Q1 Argentina Buenos Aires 3008 6 1/4/2010 2010-Q2 Argentina Buenos Aires 3244 7 1/7/2010 2010-Q3 Argentina Buenos Aires 78 8 1/10/2010 2010-Q4 Argentina Buenos Aires 7379 9 1/1/2011 2011-Q1 Argentina Buenos Aires 3735 10 1/4/2011 2011-Q2 Argentina Buenos Aires 7339 11 1/7/2011 2011-Q3 Argentina Buenos Aires 17240 12 1/10/2011 2011-Q4 Argentina Buenos Aires 20465 13 1/1/2012 2012-Q1 Argentina Buenos Aires 13134 14 1/4/2012 2012-Q2 Argentina Buenos Aires 15039
我預測三季度即2012 Q3 2012 Q4和2013 Q1與ETS(A,N,N)的幫助。代碼的預測是如下
retail_data.xts<-xts(retail_data$sales_revenue, retail_data$period);
retail_data.ts <- as.ts(retail_data.xts);
retail_data.ets <- ets(retail_data.ts,model="ANN");
retail_data.fore <- forecast(retail_data.ets, h=4);
plot(retail_data.fore);
計算的結果是
Point Forecast Lo 80 Hi 80 Lo 95 Hi 95 15 14905.37 8925.968 20884.78 5760.6608 24050.09 16 14905.37 7202.071 22608.68 3124.1881 26686.56 17 14905.37 5798.868 24011.88 978.1739 28832.58 18 14905.37 4584.713 25226.04 -878.7150 30689.46
所有的預測值是在S AME。
是由於小數據集或我的方法不好?
需要建議。