tests/testthat/helper02_unique-slug.R

slug <- paste("test-gs", Sys.info()["user"], "", sep = "-")

TEST <- tempfile(slug, tmpdir = "") %>% basename()

p_ <- function(x) paste(TEST, x, sep = "-")

Try the googlesheets package in your browser

Any scripts or data that you put into this service are public.

googlesheets documentation built on May 2, 2019, 1:57 p.m.