# Task 1
fAddDate("path1/","path2/filepre","filemid","fileend.png")
# Task 2
fAddDate(c("path1/","path2/"),"filepre","filemid","fileend.png")
# Task 3
fAddDate("one_file_name_fileend.pdf")
# Task 4
fAddDate(c("path1/","path2/"),"file1-","filemid",c("fileend.png",".pdf"))
# Task 5
data("USArrests")
USArrests$fn = paste0(row.names(USArrests), ".txt")
head(fAddDate(USArrests$fn),10)
# Task 6: format date - month.day.year
fAddDate("sample_file_name.pdf", format = "%B.%d.%YYYY")
# Task 7: format date - year_month
fAddDate("sample_file_name.pdf", format = "%YYYY_%m")
Run the code above in your browser using DataLab