X-Git-Url: https://git.auder.net/?a=blobdiff_plain;f=pkg%2FR%2FJ_Zero.R;h=01ba9e30595335126f06b78bfc489fef7d48c8d4;hb=a3344f7591f6f4b3d337a69e4a568e9b16e33415;hp=065226ed0790e95d2bcfcac9317de03d8da0a4c7;hpb=102bcfda4afbb5cfee885cbee0f55545624168fd;p=talweg.git

diff --git a/pkg/R/J_Zero.R b/pkg/R/J_Zero.R
index 065226e..01ba9e3 100644
--- a/pkg/R/J_Zero.R
+++ b/pkg/R/J_Zero.R
@@ -1,14 +1,15 @@
 #' getZeroJumpPredict
 #'
-#' Just predict zero "jump" (for reference, benchmarking at least).
+#' "Reset level to 0": jump by -A where A is the last observed value.
 #'
 #' @inheritParams computeForecast
 #' @param today Index of the current day (predict tomorrow)
 #' @param params Optional parameters computed by the main forecaster
 #'
-#' @alias J_Zero
+#' @aliases J_Zero
 #'
-getZeroJumpPredict = function(data, today, memory, horizon, params, ...)
+getZeroJumpPredict = function(data, today, memory, predict_from, horizon, params, ...)
 {
-	0
+	list(...)$first_pred - ifelse( predict_from >= 2,
+		data$getSerie(today)[predict_from-1], tail(data$getSerie(today-1),1) )
 }