Update generate_forecast_score_arrow.R

FLARE-forecast · Feb 23, 2024 · f0ff6b5 · f0ff6b5
1 parent 4a63703
commit f0ff6b5
Showing 1 changed file with 1 addition and 5 deletions.
diff --git a/R/generate_forecast_score_arrow.R b/R/generate_forecast_score_arrow.R
@@ -57,11 +57,7 @@ generate_forecast_score_arrow <- function(targets_file,
                                 units = "seconds"),
            horizon = horizon / 86400)
 
-
-  reference_datetime_format <- "%Y-%m-%d %H:%M:%S"
-
-  df <- df |> dplyr::mutate(reference_datetime = strftime(lubridate::as_datetime(reference_datetime),format=reference_datetime_format,tz = "UTC"),
-                           reference_date = lubridate::as_date(datetime))
+  df <- df |> dplyr::mutate(reference_date = lubridate::as_date(datetime))
 
   arrow::write_dataset(df, path = output_directory, partitioning = c("site_id","model_id","reference_date"))