if (FALSE) { # rlang::is_installed("filelock")
# Old api
pin(data.frame(x = 1:3), "test")
pin_get("test")
# New api
board <- board_local()
board %>% pin_write(data.frame(x = 1:3), "test")
board %>% pin_read("test")
}
Run the code above in your browser using DataLab