# Take into account the usage of tempfile() with multiple function calls
if (FALSE) {
data(Theoph)
ltx_list(Theoph[1:11,],out=tempfile(fileext=".tex"),show=FALSE)
ltx_plot(plot(conc~Time,data=Theoph),out=tempfile(fileext=".tex"),show=FALSE)
ltx_combine(combine=tempdir(),out="rep1.tex")
# possibility for presentation layout (beamer template provided in package)
ltx_combine(combine=tempdir(),out="rep1.tex",
template=paste0(system.file(package="R3port"),"/beamer.tex"),
presentation=TRUE)
# Or other template with different orientation
ltx_combine(combine=tempdir(),out="rep1.tex",
template=paste0(system.file(package="R3port"),"/listing.tex"),
orientation="portrait")
}
Run the code above in your browser using DataLab