Skip to content

Commit

Permalink
New UCM CV
Browse files Browse the repository at this point in the history
  • Loading branch information
giocoal committed Jan 4, 2023
1 parent 7b9fb63 commit 4bcce75
Show file tree
Hide file tree
Showing 7 changed files with 1,055 additions and 1,051 deletions.
350 changes: 175 additions & 175 deletions Analisi predittive/Errors/UCM/UCM_Covid_e1.csv

Large diffs are not rendered by default.

350 changes: 175 additions & 175 deletions Analisi predittive/Errors/UCM/UCM_Covid_e1_percentage.csv

Large diffs are not rendered by default.

350 changes: 175 additions & 175 deletions Analisi predittive/Errors/UCM/UCM_Covid_e3.csv

Large diffs are not rendered by default.

350 changes: 175 additions & 175 deletions Analisi predittive/Errors/UCM/UCM_Covid_e3_percentage.csv

Large diffs are not rendered by default.

350 changes: 175 additions & 175 deletions Analisi predittive/Errors/UCM/UCM_Covid_e5.csv

Large diffs are not rendered by default.

350 changes: 175 additions & 175 deletions Analisi predittive/Errors/UCM/UCM_Covid_e5_percentage.csv

Large diffs are not rendered by default.

6 changes: 5 additions & 1 deletion Analisi predittive/UCM_R1.Rmd
Original file line number Diff line number Diff line change
Expand Up @@ -1231,7 +1231,7 @@ source("My-TSCrossValidation-Functions.R")
```{r}
# Parametri di cross-validation globali
h = 60 # 8 settimane
initial = 540 # Un anno
initial = 365 # Un anno
window = NULL # no moving window, si rolling origin

# Calcolo tempo di computazione
Expand All @@ -1253,13 +1253,17 @@ e3_percentage <- e_3$e_percentage
e3_groundtruth <- e_3$e_groundtruth
e3_estimate <- e_3$e_estimate

initial = 540 # Un anno

# CV su MODELLO 4
e_4 <- tsCV_UCM(my_xts = ss, forecastfunction = mod4_post, h=h, initial = initial, window = window)
e4 <- e_4$e
e4_percentage <- e_4$e_percentage
e4_groundtruth <- e_4$e_groundtruth
e4_estimate <- e_4$e_estimate

initial = 365 # Un anno

# CV su MODELLO 5
e_5 <- tsCV_UCM(my_xts = ss, forecastfunction = mod5_post, h=h, initial = initial, window = window)
e5 <- e_5$e
Expand Down

0 comments on commit 4bcce75

Please sign in to comment.