Tutorial for urlshorteneR – v4

dmpe @ github

2022-05-09

urlshorteneR wraps 2 URL services Bit.ly and is.gd domain as well as v.gd domain. In order to begin shortening URLs and downloading useful statistics about short links, you have to – in the case of https://bit.ly – authenticate using OAuth2.0.

For is.gd and v.gd there is no authentication needed. Just create desired short links, see below.

Bit.ly

User/App Information & Authentication for Bit.ly

Return some basic information about my user on Bit.ly. Additionally, is my account a “premium” one?

library("knitr")
library(urlshorteneR)
## In order to use bitly functions, you first need to authenticate.
##                         For that execute 'bitly_auth()' in R console.
if(interactive()) {
  opts_knit$set(root.dir = "~/Documents/urlshorteneR")
  bitly_token <- readRDS("tests/bitly_local_token.rds")

# You must register a new pair of keys yourself
# bitly_token <- bitly_auth(key = "xxx", secret = "xxx")
# bitly_token <- bitly_auth()

  ui <- bitly_user_info(showRequestURL = TRUE)
  is_bitly_user_premium_holder()
}

We can also decide to update my username with a different one.

if (interactive()) {
bitly_update_user(name = "John Malc", showRequestURL = TRUE)
}

And what about the metadata about our OAUTH application?

if (interactive()) {
bitly_app_details()
}

Group Information

This retrieves information about a single group that user belongs to and and then about all groups that user are associated with.

if (interactive()) {

bitly_retrieve_group(ui$default_group_guid)
bitly_retrieve_groups()
}

Information about Organizations

Official API documentation https://dev.bitly.com/api-reference.

The first method returns an information about myself.

if (interactive()) {
bitly_user_info()
}

Is.gd & V.gd

Is.gd

isgd_LinksShorten(longUrl = "https://us.cnn.com", showRequestURL = TRUE)
## The requested URL has been this:  https://is.gd/create.php?format=json&url=https%3A%2F%2Fus.cnn.com&logstats=0
## [1] "https://is.gd/w56Qbw"

V.gd

vgd_LinksShorten(longUrl = "https://www.cbs.com", showRequestURL = TRUE)
## The requested URL has been this:  https://v.gd/create.php?format=json&url=https%3A%2F%2Fwww.cbs.com&logstats=0
## [1] "https://v.gd/K6VQiT"