Copies pdf file while removing temporary pdf files

pdf_clean() copies input pdf file to output and removes temporary pdf files with rm_temp_pdfs(exclude = output).

Usage

pdf_clean(input, output = NULL, ..., fileext = "___pnpmisc.pdf")

Arguments

input

Input pdf filename.

output

Output pdf filename. NULL defaults to a tempfile() with a ___pnpmisc.pdf file extension.

...

Ignored.

fileext

File extension of the temporary pdf files to list/remove. Defaults to ___pnpmisc.pdf, the file extension this package gives the temporary pdf files it creates. Use a more indiscriminate value such as ".pdf" to also list/remove pdf files in tempdir() created by other means.

Value

output pdf file name invisibly. As a side effect copies input to output and removes temporary pdf files.

Examples

f1 <- pdf_create_blank()
f2 <- pdf_compress(f1)
f3 <- pdf_subset(f2, pages = 1L)
ls_temp_pdfs()
#> [1] "/tmp/Rtmpmmhy28/file28242e12e21154___pnpmisc.pdf"
#> [2] "/tmp/Rtmpmmhy28/file28242e19aedbc8___pnpmisc.pdf"
#> [3] "/tmp/Rtmpmmhy28/file28242e50a17267___pnpmisc.pdf"
output <- tempfile(fileext = ".pdf")
pdf_clean(f3, output)
ls_temp_pdfs()
#> character(0)
unlink(output)