# \donttest{
## load package and enforce par(ask = FALSE)
library("exams")
options(device.ask.default = FALSE)
## define an exams (= list of exercises)
myexam <- c(
"boxplots.Rmd",
"tstat.Rmd",
"ttest.Rmd",
"relfreq.Rmd"
)
## output directory
dir.create(mydir <- tempfile())
## generate .xml with Wooclap quiz in temporary directory
exams2wooclap(myexam, dir = mydir)
dir(mydir)
# }
Run the code above in your browser using DataLab