R/chinaWeather.R

Defines functions filename

Documented in filename

#' Define a filename from current date.
#' 
#' @param date input a date type
#' @return character a file name
#' @keywords filename
#' @export
#' @examples 
#' filename()
#' filename(as.Date("20110701",format="%Y%m%d"))
filename <- function(date = Sys.time()) {
    paste(format(date, "%Y%m%d"), ".csv", sep = "")
} 
AmberGlasses/chinaWeather documentation built on May 28, 2017, 3:52 p.m.