Commit 31a7444f authored by esthervankleef's avatar esthervankleef
Browse files

Change date_range for stringency function to using last_day

parent 45ddd4da
......@@ -55,11 +55,14 @@ plan <- drake_plan(## raw_data = read_excel(
## ),
## ECDC Covid19 geographic distribution data
# last_day = Sys.Date() - 1,
last_day = as.Date("2020-07-22"),
last_day = Sys.Date() - 1,
#last_day = as.Date("2020-07-22"),
## string for today
sdt = format(last_day, "%d %b %Y"),
## date range for lockdown
date_range_lock = paste0("2020-01-01/",last_day),
covid = ecdc_covid19(last_day) %>%
# rm some negative records that are obvious errors
# should we use NA instead?
......@@ -83,7 +86,7 @@ plan <- drake_plan(## raw_data = read_excel(
## This tool aims to track and compare
## policy responses around the world, rigorously and consistently.
lock = stringency(),
lock = stringency(date_range_lock),
## CARTOGRAPHY ---------------------------------------------------
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment