R/get_dateTime.src.R

In jjlinscientist/useful_R_functions: What the Package Does (One Line, Title Case)

#' Sys.time() wrapper parse
#'
#' Parses Sys.time() for a filename-friendly timestamp
#' @export
#' @examples
#' get_dateTime() 
#' [1] "2019-01-01_000001"

get_dateTime <- function()
{
	dateTime <- Sys.time()
	dateTime <- gsub(" ", "_", dateTime)
	dateTime <- gsub(":", "", dateTime)
	dateTime <- gsub("UTC", "", dateTime)
	return(dateTime)
}