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/RtmpqcANe8/file166552f1cb65 2024-10-28 042239.txt
add_file_timestamp(file2)
#> /tmp/RtmpqcANe8/file1665719cd3a9 2024-10-28 042239

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