fix plotting; TODO: tests, reports

[talweg.git] / pkg / R / getForecast.R

diff --git a/pkg/R/getForecast.R b/pkg/R/getForecast.R
index c07be7c..b48f3da 100644 (file)
--- 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(),