tests/testthat/helper-path_to_src.R

path_to_src <- file.path(getwd(), "testdata", fsep = .Platform$file.sep)

path_to_folder_without_r <- file.path(path_to_src, "dummy_folder_without_R", fsep = .Platform$file.sep)

path_to_folder_without_subfolders <- file.path(path_to_src, "dummy_folder_without_subfolders", fsep = .Platform$file.sep)
fkoh111/fkoh111 documentation built on July 21, 2020, 7:40 p.m.