file date input format

Author: nmdefries

backfill_corrections/delphiBackfillCorrection/R/model.R

@@ -306,7 +306,7 @@ get_training_date_range <- function(params) {
     } else {
       # If only some models are in the cache, they will be used and those
       # missing will be regenerated as-of the training end date.
-      training_end_date <- max(as.Date(substr(model_files, 1, 8)))
+      training_end_date <- max(as.Date(substr(model_files, 1, 8), "%Y%m%d"))
     }
   }