r - Sweave で生成された PDF に日付を添付

Question

Sweave で日報を作成しています。PDF の名前に現在の日付を YYYYMMDD の形式で付けたいと思います。次のコードを使用してファイルを生成しています。

rnwfile <- system.file("Sweave", "Margin.Rnw", package = "utils")
Sweave(rnwfile)
tools::texi2pdf("Margin.tex")

Margin.Rnw は、生成したいレポートのマスター コピーです (LaTeX と R コードの混合)。私が得る出力は、ファイルMargin.pdfです。代わりに、*Margin_YYYYMMDD.pdf* という名前のファイルが必要です。何かアドバイスがあればよろしくお願いします。

Answer 1

outputの引数を参照してください?RweaveLatex。

これはテストされていませんが、(?) 動作するはずです:

rnwfile <- system.file("Sweave", "Margin.Rnw", package = "utils")
outfn <- paste0("Margin_",format(Sys.time(),"%Y%m%d"),".tex")
Sweave(rnwfile,output=outfn)
tools::texi2pdf(outfn)