Create a date-time string to append to filenames to try and make
them unique. The date-time string has the format
month-day-year_hour-minute; for example, May 4, 2016 at 12:34pm is
represented as may042016_1234.
# NOT RUN {# }# NOT RUN { current.time <- as.POSIXct("2016-05-04 12:34:56.78", tz = "UTC")
FileTimeStamp(current.time)
# [1] may042016_1234# }# NOT RUN {# }