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/Rtmpek1tIz/file164b357015b 2024-12-06 045108.txt
add_file_timestamp(file2)
#> /tmp/Rtmpek1tIz/file164b105c7647 2024-12-06 045108

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