data-raw/COVID_UK_Dates.R

library(readxl)
library(usethis)
library(tidyverse)

setwd("~/Git/uk-covid-datatools")
ukCovidDates <- read_excel("data-raw/COVID Dates.xlsx")
ukCovidDates = ukCovidDates %>% mutate(`Start date`=as.Date(`Start date`), `End date`=as.Date(`End date`))
usethis::use_data(ukCovidDates, overwrite = TRUE)
terminological/uk-covid-datatools documentation built on June 24, 2021, 8:16 p.m.