2017-04-13 19:36:22 +04:00
|
|
|
#!/usr/bin/python
|
|
|
|
# -*- coding: utf8 -*-
|
|
|
|
|
|
|
|
import numpy as np
|
|
|
|
from statsmodels.regression.quantile_regression import QuantReg
|
2017-04-14 00:27:38 +04:00
|
|
|
from statsmodels.tsa.tsatools import lagmat
|
2017-04-13 19:36:22 +04:00
|
|
|
from pyFTS import fts
|
|
|
|
|
|
|
|
|
|
|
|
class QuantileRegression(fts.FTS):
|
2017-05-02 18:32:03 +04:00
|
|
|
"""Façade for statsmodels.regression.quantile_regression"""
|
2017-05-08 21:49:45 +04:00
|
|
|
def __init__(self, name, **kwargs):
|
2017-05-08 22:20:16 +04:00
|
|
|
super(QuantileRegression, self).__init__(1, "QR"+name)
|
2017-04-13 19:36:22 +04:00
|
|
|
self.name = "QR"
|
|
|
|
self.detail = "Quantile Regression"
|
2017-05-02 18:32:03 +04:00
|
|
|
self.is_high_order = True
|
|
|
|
self.has_point_forecasting = True
|
|
|
|
self.has_interval_forecasting = True
|
2017-05-07 00:04:37 +04:00
|
|
|
self.has_probability_forecasting = True
|
2017-04-13 19:36:22 +04:00
|
|
|
self.benchmark_only = True
|
|
|
|
self.minOrder = 1
|
2017-05-14 04:03:49 +04:00
|
|
|
self.alpha = kwargs.get("alpha", 0.05)
|
2017-04-14 00:27:38 +04:00
|
|
|
self.upper_qt = None
|
|
|
|
self.mean_qt = None
|
|
|
|
self.lower_qt = None
|
2017-04-13 19:36:22 +04:00
|
|
|
|
|
|
|
def train(self, data, sets, order=1, parameters=None):
|
2017-04-14 00:27:38 +04:00
|
|
|
self.order = order
|
2017-04-15 03:48:53 +04:00
|
|
|
|
2017-04-14 00:27:38 +04:00
|
|
|
tmp = np.array(self.doTransformations(data))
|
|
|
|
|
|
|
|
lagdata, ndata = lagmat(tmp, maxlag=order, trim="both", original='sep')
|
|
|
|
|
2017-05-08 21:49:45 +04:00
|
|
|
mqt = QuantReg(ndata, lagdata).fit(0.5)
|
|
|
|
if self.alpha is not None:
|
|
|
|
uqt = QuantReg(ndata, lagdata).fit(1 - self.alpha)
|
|
|
|
lqt = QuantReg(ndata, lagdata).fit(self.alpha)
|
|
|
|
|
|
|
|
self.mean_qt = [k for k in mqt.params]
|
|
|
|
if self.alpha is not None:
|
2017-05-14 05:32:40 +04:00
|
|
|
self.upper_qt = [k for k in uqt.params]
|
|
|
|
self.lower_qt = [k for k in lqt.params]
|
2017-04-14 00:27:38 +04:00
|
|
|
|
2017-05-08 22:20:16 +04:00
|
|
|
self.shortname = "QAR(" + str(self.order) + ")"
|
|
|
|
|
2017-04-14 00:27:38 +04:00
|
|
|
def linearmodel(self,data,params):
|
2017-05-08 22:20:16 +04:00
|
|
|
#return params[0] + sum([ data[k] * params[k+1] for k in np.arange(0, self.order) ])
|
|
|
|
return sum([data[k] * params[k] for k in np.arange(0, self.order)])
|
2017-04-13 19:36:22 +04:00
|
|
|
|
2017-04-15 02:57:39 +04:00
|
|
|
def forecast(self, data, **kwargs):
|
2017-04-14 00:27:38 +04:00
|
|
|
ndata = np.array(self.doTransformations(data))
|
|
|
|
l = len(ndata)
|
|
|
|
|
|
|
|
ret = []
|
|
|
|
|
2017-05-10 02:04:51 +04:00
|
|
|
for k in np.arange(self.order, l+1): #+1 to forecast one step ahead given all available lags
|
2017-04-14 00:27:38 +04:00
|
|
|
sample = ndata[k - self.order : k]
|
|
|
|
|
|
|
|
ret.append(self.linearmodel(sample, self.mean_qt))
|
|
|
|
|
|
|
|
ret = self.doInverseTransformations(ret, params=[data[self.order - 1:]])
|
|
|
|
|
|
|
|
return ret
|
|
|
|
|
2017-04-15 02:57:39 +04:00
|
|
|
def forecastInterval(self, data, **kwargs):
|
2017-04-14 00:27:38 +04:00
|
|
|
|
|
|
|
ndata = np.array(self.doTransformations(data))
|
|
|
|
|
|
|
|
l = len(ndata)
|
|
|
|
|
|
|
|
ret = []
|
|
|
|
|
2017-05-10 02:04:51 +04:00
|
|
|
for k in np.arange(self.order , l):
|
2017-04-14 00:27:38 +04:00
|
|
|
sample = ndata[k - self.order: k]
|
|
|
|
up = self.linearmodel(sample, self.upper_qt)
|
|
|
|
down = self.linearmodel(sample, self.down_qt)
|
|
|
|
ret.append([up, down])
|
|
|
|
|
2017-05-14 04:37:10 +04:00
|
|
|
ret = self.doInverseTransformations(ret, params=[data[self.order - 1:]], interval=True)
|
2017-04-14 00:27:38 +04:00
|
|
|
|
|
|
|
return ret
|