R/format_date.R

In IVFL-BOKU/sentinel2: Tools to access Sentinel-2 data pre-processed by IVFL, BOKU Vienna

#' Reformats date
#'
#' Simplifies the 'date' from 'YYYY-MM-DD HH:MM:SS' to 'YYYY-MM-DD' for
#' filenaming
#'
#' @param x a character string representing date/time as 'YYYY-MM-DD HH:MM:SS'
#' @return character of format 'YYYY-MM-DD'


format_date <- function(x){
  x <- strptime(x = x, format = "%Y-%m-%d %T")
  x <- format(x, format = "%Y-%m-%d")
  return(as.character(x))
}