X-Git-Url: https://git.auder.net/?p=talweg.git;a=blobdiff_plain;f=pkg%2FR%2FgetForecast.R;h=b48f3da8383c3a56b2feddd97828f81ce45902cf;hp=c07be7c6df367c0ca782e6b279b8ca7926254c5b;hb=16b1c049a9c402544d7076cacfe6b00a3785b51f;hpb=469529710f56c790ae932b45d13fed2e34bcabf2 diff --git a/pkg/R/getForecast.R b/pkg/R/getForecast.R index c07be7c..b48f3da 100644 --- a/pkg/R/getForecast.R +++ b/pkg/R/getForecast.R @@ -10,7 +10,6 @@ #' \item Neighbors : use values from the k closest neighbors' tomorrows #' \item Average : global average of all the (similar) "tomorrow of past" #' \item Zero : just output 0 (benchmarking purpose) -#' \item Level : output a flat serie repeating the last observed level #' } #' @param pjump How to predict the jump at the interface between two days ? #' \itemize{ @@ -60,6 +59,7 @@ getForecast = function(data, indices, forecaster, pjump=NULL, getFromNamespace(paste("get",pjump,"JumpPredict",sep=""), "talweg")) for (today in indices) { + #pred$append(...) is slow; TODO: use R6 class pred[[length(pred)+1]] = list( "serie" = forecaster$predict(today, memory, horizon, ...), "params" = forecaster$getParameters(),