Commit 02b4ec14 authored by Francois Michonneau's avatar Francois Michonneau Committed by GitHub
Browse files

Merge pull request #62 from fmichonneau/fix-knitr-env 

use anonymous function to generate markdown files
parents 0c9c1533 4e8365b0

bin/generate_md_episodes.R

+3 −3
Original line number Diff line number Diff line
@@ -10,6 +10,6 @@ if (!require("stringr")) 
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])

}
 
mapply(function(x, y) {

        knitr::knit(x, output = y)

    }, src_rmd, dest_md)