R/utils.R

Defines functions createTempFolder

createTempFolder = function(basename, ndigits = 6) {
  id = paste(sample(c(letters[1:6], 0:9), ndigits), collapse = "")
  drs = file.path(tempdir(), paste0(basename, id))
  if (!dir.exists(drs)) dir.create(drs)
  return(invisible(drs))
}

Try the leafpop package in your browser

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

leafpop documentation built on May 22, 2021, 5:06 p.m.