# NOT RUN {
data(AirPassengers)
len_data = length(as.vector(array(AirPassengers)))
UnivariateData = as.vector(AirPassengers)[1:(len_data-1)]
CoefficientCombination = c(1,1,1)
Aggregation = c(2,4)
forecast = mrf_regression_one_step_forecast(UnivariateData,
CoefficientCombination,
Aggregation)
true_value = array(AirPassengers)[len_data]
error = true_value - forecast
# }
Run the code above in your browser using DataLab