MdRAE: MdRAE - Median Relative Absolute Error
In jdestefani/UEMTS: Univariate Error Measures for Time Series forecasting

Description Usage Arguments Value Examples

MdRAE = median(r_t)

1	MdRAE(y, y_hat, y_hat_bench)

`y`	True values of the time series
`y_hat`	Forecasted values of the time series
`y_hat_bench`	Forecasted values of the time series using the benchmark model

MdRAE value

y <- AirPassengers
splitting_point <- round(2*length(y)/3)
y_train <- y[1:splitting_point]
h <- 5
y_test <- y[(splitting_point+1):(splitting_point+h)]
y_hat_naive <- rep(tail(y_train,1),h)
y_hat_average <-  rep(mean(y_train),h)
results <- MdRAE(y_test,y_hat_average,y_hat_naive)