Change stringency function to take on date_range from plan

src/functions.R

 ## get lockdown data https://covidtracker.bsg.ox.ac.uk/
 ## Blavatnik School of Government / Oxford Univ
 ## Oxford COVID-19 Government Response Tracker
-stringency <- function(date_range = "2020-01-01/2020-05-31"){
+#stringency <- function(date_range = "2020-01-01/2020-05-31"){
+stringency <- function(date_range){
     web <- "https://covidtrackerapi.bsg.ox.ac.uk/"
     api <- "api/v2/stringency/"
     fjs <- paste(web,