R/dbSafeNames.R

In HarryRosen/hrimodules: Harry Rosen Inc Shiny Modules

#' Creating database safe names for export
#' make names db safe: no '.' or other illegal characters,
#' all lower case and unique
#'
#' @param names The name passed to convert to a db safe name
#'
#'
dbSafeNames = function(names) {
  names = gsub('[^a-z0-9]+', '_', tolower(names))
  names = make.names(names, unique = TRUE, allow_ = TRUE)
  names = gsub('.', '_', names, fixed = TRUE)
  names
}