R/genPassword.R

Defines functions genPassword

genPassword <- function() {
  set.seed(as.integer(Sys.time()))
  v1 <- sample(letters, 6, replace = TRUE)
  v2 <- sample(LETTERS, 6, replace = TRUE)
  v3 <- sample(0:9, 6, replace = TRUE)
  paste(sample(c(v1, v2, v3)), collapse = "")
}
daynefiler/dlfUtils documentation built on Oct. 22, 2021, 9:49 a.m.