R/find_resourcesPT.R

find_resourcesPT<-function (template, file = "template.tex")
{
  res <- system.file("rmarkdown", "templates", template, "resources",
                     file, package = "WileyHBMtemplate")
  if (res == "")
    stop("Couldn't find template file ", template, "/resources/",
         file, call. = FALSE)
  res
}
p1981thompson/HBM_Rmarkdown_template documentation built on Dec. 3, 2019, 12:42 a.m.