bitly_token <- bitly_auth(key = "", secret = "")
bitly_LinksMetricsCountries(link = "http://bit.ly/DPetrov", unit = "day", units = -1, limit = 100)
bitly_LinksMetricsCountries(link = "http://bit.ly/DPetrov", unit = "day", units = -1, limit = 100,
showRequestURL= TRUE)Run the code above in your browser using DataLab