data-raw/covid19-vaccines-dataset.R

In markushlang/covid19vaccines: DRAFT Landscape of COVID-19 Candidate Vaccines

library(tidyr)
library(dplyr)
library(janitor)
library(tibble)
library(stringr)

# Read in, clean and separate columns
covid19vaccines <- novel_coronavirus_landscape_ncov %>%
  janitor::clean_names() %>%
  dplyr::rename(current_stage_of_clinical_evaluation = current_stage_of_clinical_evaluation_regulatory_status_coronavirus_candidate)

# Transform into tidy-format
covid19vaccines <- tidyr::as_tibble(covid19vaccines)

# Save as .rda
usethis::use_data(covid19vaccines, overwrite = TRUE)