将日期和时间添加到pdf输出文件名

Question

我将图形输出从R导出到pdf文件.

我想将Sys.time()和Sys.Date()添加到outfile名称.

比如我有一个声明

pdf("output filename.pdf", 8,10)

我想输出看起来像输出 filename 2010-03-25 2pm.pdf

或类似的东西.

Answer 1

结合Sys.time()一些格式来获得你想要的东西:

paste(format(Sys.time(), "%Y-%m-%d %I-%p"), "pdf", sep = ".")
[1] "2011-03-24 03-PM.pdf"

格式化选项可以在中找到 ?strptime

Answer 2

将其分为两个步骤，以便在其他文档上轻松实现。

st=format(Sys.time(), "%Y-%m-%d_%H:%M")
paste("filename_",st, ".pdf", sep = "")
[1] "filename_2018-06-19_11:20.pdf"

Answer 3

你可以试试

pdf (file=paste (Sys.time(), ".pdf", sep=""))
plot (rnorm (100))
dev.off()