Fix dates in new AB weekly case time series

- ccodwg/CovidTimelineCanada#116
ccodwg · Oct 7, 2023 · 08405fa · 08405fa
1 parent ba8e41e
commit 08405fa
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/ab.R b/R/ab.R
@@ -464,13 +464,13 @@ process_ab <- function(uuid, val, fmt, ds,
               hrs <- rep(d$x$data$name[1:5], each = length(dates[[1]]))
               data.frame(
                 sub_region_1 = hrs,
-                date = as.Date(unlist(dates)),
+                date = as.Date(unlist(dates)) + 6, # end of week
                 value = as.integer(unlist(vals))
               ) |> helper_ts(loc = "hr", val, prov, convert_to_cum = FALSE)
             },
             e_fmt()
           )
-        }
+        },
         e_val()
       )
     },