# NOT RUN {
bitly_token <- bitly_auth(key = "", secret = "")
bitly_UserMetricsReferringDomains(unit = "day", units = -1, limit = 100, rollup = "true")
bitly_UserMetricsReferringDomains(unit = "day", units = -1, limit = 100, rollup = "false")
bitly_UserMetricsReferringDomains(unit = "day", units = -1, limit = 100,
exclude_social_networks = "false")
bitly_UserMetricsReferringDomains(unit = "day", units = -1, limit = 100,
exclude_social_networks = "true")
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab