Fix limits in urine24 by not using win_tbl

eth-mds · Apr 11, 2024 · 3c0a7fc · 3c0a7fc
1 parent 7f2cc42
commit 3c0a7fc
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/callback-cncpt.R b/R/callback-cncpt.R
@@ -468,7 +468,8 @@ urine24 <- function(..., min_win = hours(12L), limits = NULL,
   step_factor <- convert_dt(hours(24L)) / as.double(interval)
 
   if (is.null(limits)) {
-    limits <- collapse(res)
+    limits <- collapse(res, as_win_tbl = FALSE) 
+    limits <- as_ts_tbl(limits, index_var = "start", interval = interval(res))
   }
 
   res <- fill_gaps(res, limits = limits)