PKG-26b

1. Load data

ts <- read.csv("https://raw.githubusercontent.com/forvis/forvision_data/master/M3_quarterly_TSTS.csv", stringsAsFactors = FALSE)
fs <- read.csv("https://raw.githubusercontent.com/forvis/forvision_data/master/M3_quarterly_PIs_FTS.csv", stringsAsFactors = FALSE)
head(ts)

head(fs)

2. plotHitrateChart

plotHitrateChart(ts, fs, m = "ARIMA", pi = 95)

plotHitrateChart(ts, fs, m = "ARIMA", pi = 95, sort = TRUE)

# В данных только один метод (если много методов то выводятся разные методы с h = 1)
plotHitrateChart(ts, fs, h = 1, pi = 95)

plotHitrateChart(ts, fs, h = 1:4, pi = 95)