# (re)initialize computed parameters
private$.params <- list("weights"=NA, "indices"=NA, "window"=NA)
+ # Do not forecast on days with NAs (TODO: softer condition...)
+ if (any(is.na(data$getCenteredSerie(today))))
+ return (NA)
+
# Determine indices of no-NAs days followed by no-NAs tomorrows
fdays = getNoNA2(data, max(today-memory,1), today-1)