if(identical(Sys.getenv("NOT_CRAN"), "true")) {

    files <- list.files("Rmdtest", pattern="\\.Rmd$")
    for(file in files)
        rmarkdown::render(file.path("Rmdtest", file))

}