tests/testthat/teardown.R

pdf_path =  test_path('Rplots.pdf')

# check for write permission
if(isTRUE(file.access(pdf_path, mode = 2)==0))
  file.remove(pdf_path)
natverse/nat documentation built on Oct. 19, 2024, 11:37 a.m.