You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
boB Rudis 5c6dd05249
LICENSE yaer
4 vuotta sitten
R cran check 4 vuotta sitten
inst/tinytest README/tinytest 4 vuotta sitten
man cran check 4 vuotta sitten
tests README/tinytest 4 vuotta sitten
.Rbuildignore rbuildignore 8 vuotta sitten
.gitignore Initial commit 9 vuotta sitten
.travis.yml passes CRAN checks 7 vuotta sitten
CONDUCT.md initial commit 9 vuotta sitten
DESCRIPTION cran check 4 vuotta sitten
LICENSE LICENSE yaer 4 vuotta sitten
NAMESPACE removed purrr/dplyr deps & cran preflight check 6 vuotta sitten
NEWS.md README/tinytest 4 vuotta sitten
README.Rmd cran check 4 vuotta sitten
README.md LICENSE yaer 4 vuotta sitten
cran-comments.md README/tinytest 4 vuotta sitten
longurl.Rproj fix for linkedin issue 6 vuotta sitten
longurl.png logo! 9 vuotta sitten

README.md

Project Status: Active – The project has reached a stable, usablestate and is being activelydeveloped. Signedby Signed commit% Linux buildStatus CoverageStatus cranchecks CRANstatus Minimal RVersion License

longurl

Expand Short ‘URLs’

Description

Tools are provided to expand vectors of short URLs into long ‘URLs’. No ‘API’ services are used, which may mean that this operates more slowly than ‘API’ services do (since they usually cache results of expansions that every user of the service requests). You can setup your own caching layer with the ‘memoise’ package if you wish to have a speedup during single sessions or add larger dependencies, such as ‘Redis’, to gain a longer-term performance boost at the expense of added complexity.

What’s Inside The Tin

The following functions are implemented:

  • expand_urls: Expand a vector of (short) URLs using

Installation

install.packages("longurl", repos = c("https://cinc.rud.is", "https://cloud.r-project.org/"))
# or
remotes::install_git("https://git.rud.is/hrbrmstr/longurl.git")
# or
remotes::install_git("https://git.sr.ht/~hrbrmstr/longurl")
# or
remotes::install_gitlab("hrbrmstr/longurl")
# or
remotes::install_github("hrbrmstr/longurl")

NOTE: To use the ‘remotes’ install options you will need to have the {remotes} package installed.

Usage

library(longurl)
library(magrittr)

# current version
packageVersion("longurl")
## [1] '0.3.3'
c(
  "http://t.co/D4C7aWYIiA",
  "1.usa.gov/1J6GNoW",
  "ift.tt/1L2Llfr",
  "bit.ly/1GPr5w5",
  "http://l.dds.ec/1da152x",
  "http://l.rud.is/seven",
  "qrp://not a valid url/"
) -> test_urls

expand_urls(test_urls) %>% 
  dplyr::select(orig_url, status_code, expanded_url) %>% 
  knitr::kable()
orig_url status_code expanded_url
http://t.co/D4C7aWYIiA 200 https://www.wired.com/2015/06/airlines-security-hole-grounded-polish-planes/
1.usa.gov/1J6GNoW 404 https://1.usa.gov/1J6GNoW
ift.tt/1L2Llfr 200 https://ifttt.com/applet_embeds/299814p/image?width=660&height=340
bit.ly/1GPr5w5 200 https://s3.amazonaws.com/features.ifttt.com/blog_images/Channels/Weebly+final+banner+with+IFTTT+logo.png
http://l.dds.ec/1da152x 200 http://l.dds.ec/1da152x
http://l.rud.is/seven 404 http://l.rud.is/seven
qrp://not a valid url/ NA NA

longurl Metrics

Lang # Files (%) LoC (%) Blank lines (%) # Lines (%)
R 4 0.8 110 0.84 20 0.54 51 0.65
Rmd 1 0.2 21 0.16 17 0.46 27 0.35

Code of Conduct

Please note that this project is released with a Contributor Code of Conduct. By participating in this project you agree to abide by its terms.