R/oecd.R

Defines functions oecd_countries

Documented in oecd_countries

#' Print the R code to make the vector of 38 OECD countries used in Beine et al. 2020
#' @export

oecd_countries <- function() {

  oecd <- c("United States", "France", "United Kingdom", "Germany",
            "Canada", "Spain", "Australia", "Italy", "Switzerland",
            "Sweden", "Japan", "Netherlands", "Turkey", "Austria",
            "Norway", "Belgium", "New Zealand", "Greece", "Denmark",
            "Korea", "Finland", "Ireland", "Portugal", "Czech Republic",
            "Poland", "Cyprus", "Luxembourg", "Romania", "Bulgaria",
            "Croatia", "Iceland", "Slovenia", "Hungary", "Malta",
            "Estonia", "Lithuania", "Slovakia", "Latvia")
  print(
    paste0("c('", paste(oecd, collapse = "', '"), "')")
  )
}
etiennebacher/ebmisc documentation built on May 31, 2021, 8:20 p.m.