text <- readLines("paper.md")
header_boundaries <- which(grepl("---", text))
body <- text[- c(1:18)]
cat(body, sep = "\n")


pmcharrison/psychTestR documentation built on Nov. 10, 2024, 9:03 p.m.