我正在尝试掌握如何使用机器学习来预测未来的财务时间序列1或更多步骤。
我有一个包含描述性数据的财务时间序列,我想形成一个模型,然后使用该模型预测未来的n步。
到目前为止,我一直在做的是:
getSymbols("GOOG")
GOOG$sma <- SMA(Cl(GOOG))
GOOG$range <- GOOG$GOOG.High-GOOG$GOOG.Low
tail(GOOG)
GOOG.Open GOOG.High GOOG.Low GOOG.Close GOOG.Volume GOOG.Adjusted sma range
2013-05-07 863.01 863.87 850.67 857.23 1959000 857.23 828.214 13.20
2013-05-08 857.00 873.88 852.91 873.63 2468300 873.63 834.232 20.97
2013-05-09 870.84 879.66 868.23 871.48 2200600 871.48 840.470 11.43
2013-05-10 875.31 880.54 872.16 880.23 1897700 880.23 848.351 8.38
2013-05-13 878.89 882.47 873.38 877.53 1448500 877.53 854.198 9.09
2013-05-14 877.50 888.69 877.14 887.10 1579300 887.10 860.451 11.55
然后,我为该数据拟合了randomForest模型。
fit <- randomForest(GOOG$GOOG.Close ~ GOOG$sma + GOOG$range, GOOG)
似乎非常合适:
> fit
Call:
randomForest(formula = GOOG$GOOG.Close ~ GOOG$sma + GOOG$range, data = GOOG)
Type of random forest: regression
Number of trees: 500
No. of variables tried at each split: 1
Mean of squared residuals: 353.9844
% Var explained: 97.28
并试图用它来预测:
predict(fit, GOOG, n.ahead=2)
但是这种对c的预测没有用。
我尝试预测关闭,我是否应该在拟合模型之前将其他变量滞后尽可能多的步长?
我可能还应该考虑很多其他内容,但这确实是我尝试机器学习的第一步。