Determine service based on URL

get_service(url)

Arguments

url

character, URL of web-page for video

Value

character identifying the video service

Examples

get_service("https://youtu.be/1-vcErOPofQ?t=28s")
#> [1] "youtube_short"