# NOT RUN {
library(magrittr)
directory_with_tests <- list.dirs(find.package('RTest'),recursive=TRUE) %>%
grep(pattern="xml-templates",value=TRUE)
RTest::RTest.getRTM(
testcase.directory = directory_with_tests[1],
open=FALSE,
f.pattern = "RTest_TC-generic.xml"
)
# }
Run the code above in your browser using DataLab