tests/testthat/test-create_parameter_files_article.R

In richelbilderbeek/wiritttes: WIRITTE simulation

context("create_parameter_files_article")

test_that("create_parameter_files_article works", {
  filenames <- create_parameter_files_article()

  for (filename in filenames) {
    file.remove(filename)
  }
})