# NOT RUN {
## auth
my_tok <- vkAuth(app_id = 1, app_secret = "H2Pk8htyFD8024mZaPHm")
## get dictionary
vk_countries <- vkGetDbCountries(need_all = T,
code = c("RU","UA","BY"),
access_token = my_tok$access_token)
# }
Run the code above in your browser using DataLab