Merge pull request #37 from Nixtla/fix/users-reported-issues

fix: issue with Date objects
Nixtla · Oct 18, 2024 · c2a132f · c2a132f
2 parents 4baabe3 + 05bfff5
commit c2a132f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/nixtla_client_cross_validation.R b/R/nixtla_client_cross_validation.R
@@ -220,7 +220,7 @@ nixtla_client_cross_validation <- function(df, h=8, freq=NULL, id_col="unique_id
   window_starts <- seq(0, sum(unlist(resp$sizes)) - 1, by = h)
   cutoff_idxs <- rep(idxs[window_starts + 1] - 1, each = h)
   cutoff_dates <- df$ds[unique(cutoff_idxs)]
-  cutoff <- unlist(lapply(cutoff_dates, function(i) {rep(i, times = h)}))
+  cutoff <- do.call(c, sapply(cutoff_dates, function(i) rep(i, times = h), simplify = FALSE))
   cutoff <- as.POSIXct(cutoff)
 
   dt <- data.frame(