X-Git-Url: https://git.auder.net/?a=blobdiff_plain;f=pkg%2FR%2FF_Neighbors.R;h=32d5cffc47a9bd043381ecb5d78cb56ced3e3b92;hb=41196789122f4b6bafeb7a306a3b4033637586f4;hp=ffb068f9f248eec2e02aad151ed5b7dc2d460213;hpb=3ddf1c12af0c167fe7d3bb59e63258550270cfc5;p=talweg.git

diff --git a/pkg/R/F_Neighbors.R b/pkg/R/F_Neighbors.R
index ffb068f..32d5cff 100644
--- a/pkg/R/F_Neighbors.R
+++ b/pkg/R/F_Neighbors.R
@@ -216,21 +216,6 @@ NeighborsForecaster = R6::R6Class("NeighborsForecaster",
 	)
 )
 
-#' getNoNA2
-#'
-#' Get indices in data of no-NA series followed by no-NA, within [first,last] range.
-#'
-#' @inheritParams dateIndexToInteger
-#' @param first First index (included)
-#' @param last Last index (included)
-#'
-.getNoNA2 = function(data, first, last)
-{
-	(first:last)[ sapply(first:last, function(i)
-		!any( is.na(data$getCenteredSerie(i)) | is.na(data$getCenteredSerie(i+1)) )
-	) ]
-}
-
 #' getConstrainedNeighbs
 #'
 #' Get indices of neighbors of similar pollution level (among same season + day type).
@@ -264,7 +249,7 @@ NeighborsForecaster = R6::R6Class("NeighborsForecaster",
 		fdays = fdays[
 			sort(distances[same_pollution],index.return=TRUE)$ix[1:max_neighbs] ]
 	}
-	fdsays
+	fdays
 }
 
 #' compute similarities