# NOT RUN {
# simple demo file
f <- system.file("examples", "data.pdf", package = "tabulizer")
get_n_pages(file = f)
# split PDF by page
sf <- split_pdf(f)
# merge pdf
mf <- file.path(tempdir(), "merged.pdf")
merge_pdfs(sf, mf)
get_n_pages(mf)
# }
Run the code above in your browser using DataLab