- return (.predictShapeAux(fdays,today,horizon,list(...)$h_window,kernel,simtype,TRUE))
-
- # Determine indices of no-NAs days followed by no-NAs tomorrows
- first_day = max(today - memory, 1)
- fdays = (first_day:(today-1))[ sapply(first_day:(today-1), function(i) {
- !any(is.na(data$getSerie(i)) | is.na(data$getSerie(i+1)))
- }) ]
+ {
+ return ( private$.predictShapeAux(data,
+ fdays, today, horizon, list(...)$h_window, kernel, simtype, TRUE) )
+ }