knitr::opts_chunk$set(eval=FALSE, cache=FALSE)

verbatimize.chunks = function() {
  # Make chunks verbatim as explained here
  # https://yihui.name/knitr/faq/ 
  # Point 7

  library(stringtools)
  setwd("D:/libraries/RTutor/RTutor/vignettes")
  file = "test.Rmd"
  txt = readLines(file)
  lines = which(str.starts.with(trimws(txt), "```{r") & !str.ends.with(trimws(txt),"`r ''`"))[-1]
  txt[lines] = paste0(txt[lines],"`r ''`")
  writeLines(txt, file)
}

Sneaky errors that might occur when developing a problem set



skranz/RTutor documentation built on Feb. 7, 2024, 12:53 a.m.