Open publications on the browser

This function opens urls in your browser.

Usage

open_publications(sumario)

Arguments

sumario

A tidy sumario.

Value

A tab should open on your default browser with the pdf of the publications.

Examples

if (FALSE) {
today <- Sys.Date()
# On Sunday there is not BOE
if (weekdays(today) == "Sunday") {
    today <- today - 1
}
sumario <- retrieve_sumario(today)
url_publications(sumario[1:10, ])}