github_raw <- "https://raw.githubusercontent.com/"
board <- board_url(c(
files = paste0(github_raw, "rstudio/pins-r/master/tests/testthat/pin-files/"),
rds = paste0(github_raw, "rstudio/pins-r/master/tests/testthat/pin-rds/"),
raw = paste0(github_raw, "rstudio/pins-r/master/tests/testthat/pin-files/first.txt")
))
board %>% pin_read("rds")
board %>% pin_browse("rds", local = TRUE)
board %>% pin_download("files")
board %>% pin_download("raw")
Run the code above in your browser using DataLab