fix methods, update report generation
[talweg.git] / pkg / R / J_Neighbors.R
index 03d3340..7ca0003 100644 (file)
@@ -1,13 +1,15 @@
 #' Obtain jump forecast by the Neighbors method
 #'
-#' @inheritParams getForecast
+#' @inheritParams computeForecast
 #' @inheritParams getZeroJumpPredict
+#'
 getNeighborsJumpPredict = function(data, today, memory, horizon, params, ...)
 {
        first_day = max(1, today-memory)
-       filter = params$indices >= first_day
+       filter = (params$indices >= first_day)
        indices = params$indices[filter]
        weights = params$weights[filter]
+
        if (any(is.na(weights) | is.na(indices)))
                return (NA)