SHARE
TWEET

Untitled

a guest Aug 20th, 2019 68 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. plot(forecast(na.omit(ar(transformed, order.max = 2)), h = 2), xlim = c(480, 510), ylim = c(2800, 3050), main = "", xlab = "Time", ylab = "USD")
  2. lines(prices[, "GSPC.Close"], col = "red")
  3. legend(502, 3025, legend = c("Signal", "Transformed", "Predicted"), col = c("red", "black", "blue"), lty = c(1, 1, NA), pch = c(NA, NA, 16))
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!
 
Top