# NOT RUN {
## call exams2nops
tdir <- tempdir()
exams2nops("tstat2.Rnw", dir = tdir)
match_exams_call()
## graphics device used
match_exams_device()
## exams2nops called exams2pdf called xexams:
match_exams_call(which = NULL)
## get full exams2nops call
match_exams_call(deparse = FALSE)
## but note that convenience wrappers etc. are included
e2n <- function(...) exams2nops(...)
e2n("tstat2.Rnw", dir = tdir)
match_exams_call(which = NULL)
# }
Run the code above in your browser using DataLab