out-of-sample-evaluation code snippets in r

calculate out-of-sample root mean squared error for list of arima models on r in r