X-Git-Url: https://git.arvados.org/rnaseq-cwl-training.git/blobdiff_plain/11b78e9c2ec95d5c3419b2c7690d6efe586a5762..19beaaf0c2de344412c9e0410a592013cd1369fe:/bin/generate_md_episodes.R

diff --git a/bin/generate_md_episodes.R b/bin/generate_md_episodes.R
new file mode 100644
index 0000000..91bf512
--- /dev/null
+++ b/bin/generate_md_episodes.R
@@ -0,0 +1,15 @@
+if (require("knitr")) {
+    if (packageVersion("knitr") < '1.9.19') {
+        stop("knitr must be version 1.9.20 or higher")
+    }
+} else stop("knitr 1.9.20 or above is needed to build the lessons.")
+
+if (!require("stringr"))
+    stop("The package stringr is required for generating the lessons.")
+
+src_rmd <- list.files(pattern = "??-*.Rmd$", path = "_episodes_rmd", full.names = TRUE)
+dest_md <- file.path("_episodes", gsub("Rmd$", "md", basename(src_rmd)))
+
+for (i in seq_along(src_rmd)) {
+    knitr::knit(src_rmd[i], output = dest_md[i])
+}