X-Git-Url: https://git.auder.net/images/pieces/%22%20%20%20VariantRules.getPpath%28board%5Bi%5D%5Bj%5D%29%20%20%20%22.svg?a=blobdiff_plain;f=pkg%2FR%2Futils.R;h=9e51f00dc58f7cf87b0c77e7d02270a7ea4e1ea9;hb=HEAD;hp=bc80030f3ea3df16c6718ef220bd3ea7767aa661;hpb=dca259e4e9c0235cb113b329c27157ac59d7242b;p=talweg.git diff --git a/pkg/R/utils.R b/pkg/R/utils.R index bc80030..9e51f00 100644 --- a/pkg/R/utils.R +++ b/pkg/R/utils.R @@ -61,6 +61,7 @@ integerIndexToDate = function(index, data) #' @param limit Maximum number of indices to return #' @param same_season Should the indices correspond to day in same season? #' @param days_in Optional set to intersect with results (NULL to discard) +#' @param operational If TRUE: do not look for days after index (operational context) #' #' @export getSimilarDaysIndices = function(index, data, limit, same_season, @@ -113,8 +114,8 @@ getSimilarDaysIndices = function(index, data, limit, same_season, # .isSameSeason = function(month, month_ref) { - if (month_ref == 3) #TODO: same as Bruno (but weird) - return (month %in% c(2,3,4,9,10)) +# if (month_ref == 3) #TODO: same as Bruno (but weird) +# return (month %in% c(2,3,4,9,10)) if (month_ref %in% c(11,12,1,2)) #~= mid-polluted return (month %in% c(11,12,1,2)) if (month_ref %in% c(3,4,9,10)) #~= high-polluted