Skip to contents

Get country

Usage

get_country(address)

Arguments

address

The address to parse.

Examples

# \dontshow{
.old_wd <- setwd(tempdir())
# }
if (FALSE) {
d.fls <- batch_pubmed_download2(
  pubmed_query_string = paste(
    "passion [Title/Abstract]",
    "AND Dualistic Model of Passion [Text Word]",
    "AND ('2023/01/01' [Date - Publication] : '2023/12/31' [Date - Publication])"
  ),
  year_low = 2023,
  year_high = 2023
)
articles.df <- all_articles_to_df(d.fls)
articles.df2 <- add_affiliation(articles.df)
articles.df3 <- match_university(articles.df2)
get_country(articles.df3$address)
}
# \dontshow{
unlink("easyPubMed_data_01.txt")
setwd(.old_wd)
# }