https://optemax.net/coupon/time-series-analysis-and-forecasting-using-r/