library(pins) wines <- read.csv(pin("http://source/wines.csv"))
library(pins) pin(wines, board = "kaggle")
Learn more at pins.rstudio.com