Skip to contents

Adds a timestamp to a file

Usage

add_file_timestamp(
  x,
  ts = Sys.time(),
  format = "%Y-%m-%d %H%M%S",
  sep = " "
)

Arguments

x

A vector of files

ts

A single timestamp or vector of timestamps (default: Sys.time())

format

A format to be applied to the times; set to NULL to skip formatting

sep

A character vector of length 1 to separate the timestamp from the file name

Value

The full name paths with the appended time stamp

Examples

file1 <- tempfile(fileext = ".txt")
file2 <- tempfile()

add_file_timestamp(file1)
#> /tmp/Rtmpw9Blbs/file17b873d6461d 2024-04-01 035935.txt
add_file_timestamp(file2)
#> /tmp/Rtmpw9Blbs/file17b84ecf4cbb 2024-04-01 035935

file.remove(file1, file2)
#> Warning: cannot remove file '/tmp/Rtmpw9Blbs/file17b873d6461d.txt', reason 'No such file or directory'
#> Warning: cannot remove file '/tmp/Rtmpw9Blbs/file17b84ecf4cbb', reason 'No such file or directory'
#> [1] FALSE FALSE