S. Jackson Kelley Jr.
08/13/15
The Shiny app pulls stock data from any of three options:
It then converts this data to a time series for a simple ets prediction algorithm, and, if asked by the user gives the Tiel U value for the prediction against the test set.
After splitting the time series into a test and training set the training set is passed to the time series algorithm from the forecast package. The “MMM” denotes multiplicative modeling with multiplicative errors and multiplicative trending.
ets1 = ets(trainSeries,model="MMM")
We were then able to use this model to forecast future stock prices.
plot(fcast); lines(testSeries,col="red")
However, as we can see by the Tiel U values in the app, these predictions are actually worse than guessing the stock price. (probably due to early stock price data affecting the forecast)
acc = accuracy(fcast,testSeries)
acc[16]
[1] 3.704502
This is a very simple prediction algorithm, if you give me all of your money, we will make it better and see returns of 10000%!