Nothing
#!/usr/bin/env r
## configuration for docopt
doc <- paste0("[Usage: enqueueJobs.r [-q QUEUE] [-d DBFILE] [-a] [-h] [-x] PACKAGE
-q --queue QUEUE set queue directory [default: ", getOption("prrd.queue_directory", "."), "]
-d --dbfile DBFILE set database for prior run, used new packages only [default: ]
-a --addfailed if database given, add failed previous runs
-h --help show this help text
-x --usage show help and short example usage")
opt <- docopt::docopt(doc) # docopt parsing
if (is.null(opt$dbfile)) opt$dbfile <- ""
if (opt$usage) {
cat(doc, "\n\n")
cat("Examples:
enqueueJobs.r Rcpp
enqueueJobs.r is part of prrd.r which is becoming a parallel rev dep runner.
See https://dirk.eddelbuettel.com/code/prrd.html for more information.\n")
q("no")
}
prrd::enqueueJobs(opt$PACKAGE, opt$queue, opt$dbfile, opt$addfailed)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.