X-Git-Url: https://git.auder.net/?p=talweg.git;a=blobdiff_plain;f=pkg%2FR%2FF_Neighbors.R;h=32d5cffc47a9bd043381ecb5d78cb56ced3e3b92;hp=9af4725b45f07380ebe8cb90b600bcffd8b4a7ea;hb=41196789122f4b6bafeb7a306a3b4033637586f4;hpb=c8ef2ddb2d1f28b8356a6c0aa7c8495406226a32 diff --git a/pkg/R/F_Neighbors.R b/pkg/R/F_Neighbors.R index 9af4725..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).