Skip to content

Instantly share code, notes, and snippets.

@threefeather

threefeather/Interest_rate_2.r

Last active December 9, 2016 00:26
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save threefeather/1221ac8ecbbedee7824484e922555639 to your computer and use it in GitHub Desktop.
Save threefeather/1221ac8ecbbedee7824484e922555639 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
Interest_rate_2.r
x<-Ist[c(373,622,667,706),]
ir.pre<-predict(model.season_final,x,type = "response")
data.frame(Date=Ist$Date[c(373,622,667,706)],Prediction=ir.pre,Real=Ist$Interest.Rate[c(373,622,667,706)])
Date Prediction Real
373 1981-01-01 7.133682 13.00
622 2001-10-01 -1.161944 2.02
667 2005-07-01 -0.635116 4.25
706 2008-10-01 8.995944 1.25
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment