X-Git-Url: https://git.auder.net/?a=blobdiff_plain;f=pkg%2FR%2FF_Persistence.R;h=220e04cfa9e279cff66ed47c9b505dbcbef562e9;hb=ff5df8e310b73883565761ab4b1aa5a0672e9f27;hp=ce02bd4a4165571e4088cb3a2cd68343e3b41522;hpb=af3b84f4cacade7d83221ca0249b546c50ddf340;p=talweg.git diff --git a/pkg/R/F_Persistence.R b/pkg/R/F_Persistence.R index ce02bd4..220e04c 100644 --- a/pkg/R/F_Persistence.R +++ b/pkg/R/F_Persistence.R @@ -8,7 +8,7 @@ PersistenceForecaster = R6::R6Class("PersistenceForecaster", inherit = Forecaster, public = list( - predictShape = function(today, memory, horizon, ...) + predictShape = function(data, today, memory, horizon, ...) { # Return centered last (similar) day curve, avoiding NAs until memory is run first_day = max(1, today-memory) @@ -18,7 +18,7 @@ PersistenceForecaster = R6::R6Class("PersistenceForecaster", repeat { { - last_serie = private$.data$getCenteredSerie(index)[1:horizon] + last_serie = data$getCenteredSerie(index)[1:horizon] index = index - ifelse(same_day,7,1) }; if (!any(is.na(last_serie)))