knitr::opts_chunk$set(echo = TRUE)
vignette_dir <- "../inst/misc/"
vignette_file <- "guide.md"
lines <- readLines(paste0(vignette_dir, vignette_file))
lines <- gsub("![](", replacement = paste0("![](", vignette_dir), x = lines, fixed = TRUE)
cat(lines, sep = "\n")


egr95/R-codacore documentation built on April 17, 2023, 7:45 p.m.