+# Copyright (C) The Arvados Authors. All rights reserved.
+#
+# SPDX-License-Identifier: Apache-2.0
+
#Run script with $Rscript createDoc.R input.Rmd output.html
require(knitr) # required for knitting from rmd to md
outputFile <- args[[2]] # .html file
# Create and fill temp .md file from existing .Rmd file
-tempMdFile <- tempfile("tempREADME", fileext = "md")
-knitr::knit(inputFile, tempMdFile)
+#tempMdFile <- tempfile("tempREADME", fileext = "md")
+knitr::knit(inputFile, outputFile)
+#knitr::knit(inputFile, tempMdFile)
# Generate HTML from temporary .md file
-markdown::markdownToHTML(tempMdFile, outputFile)
+#markdown::markdownToHTML(tempMdFile, outputFile)