在R中的html文件中添加时间戳

Question

我有一组html文件，它们是作为输出生成的。 html输出文件的名称应为时间戳。我可以使用以下代码生成日期。

DT::SaveWidget(Output, paste0(Sys.date(), ".html"))

我也想要时间。但是我收到一个错误“无法创建文件，原因：'无效的参数'”

DT::SaveWidget(Output, paste0(Sys.time(), ".html"))

我还尝试了以下方法：

now <- Sys.time() 
DT :: SaveWidget(Output,paste0(now, "%Y%m%d_%H%M%S_"), ".html")

它抛出相同的错误。有没有一种方法可以将时间附加到html输出文件中。它用于文件夹中的一组文件。因此，每个文件应该不同。请提出一种方法。

Answer 1

原因可能是as.character(Sys.time())包含文件名中不允许的冒号（至少在Windows中是这样）。 您可以尝试以下方法：

htmlwidgets::SaveWidget(Output, paste0(format(Sys.time(), "%Y_%m_%d__%H_%M_%S"), ".html"))