tests/testthat/current_filename.R

if (file.exists("../../DESCRIPTION")) {
  devtools::load_all("../../", quiet = T)
} else {
  library("scriptName")
}
str(current_filename())
MullinsLab/scriptName documentation built on June 19, 2019, 7:40 p.m.