return country names when all contry names is missing

<ENOENT/fs_error/error/condition>
Error: [ENOENT] Failed to make directory 'D:/RCompile/Output/Check': no such file or directory

Error: Package `rworldmap` needed for this function to work! Please, install it with: `install.packages("rworldmap")`

.scientificName_emptys <- c(TRUE, TRUE, TRUE, FALSE, FALSE)
.coordinates_empty <- c(TRUE, TRUE, TRUE, TRUE, TRUE)
.invalid_basis_of_records <- c(TRUE, FALSE, TRUE, FALSE, TRUE)
.summary <- c(TRUE, FALSE, TRUE, FALSE, FALSE)

test_that("returning  a polygon data frame", {

wiki_cntr <- system.file("extdata/countries_names/country_names.txt", package = "bdc") %>%
readr::read_delim(delim = "\t", show_col_types = FALSE)
data <- data.frame(country = c("brezil", "USA", "Bolibia", "vietnam"))
test_that("bdc_standardize_country standardize country names", {
c("Bolivia", "Brazil", "United States of America",   "Vietnam")