tests/testthat/test-get_beast2_options_filenames.R

test_that("use", {

  beast2_options <- beastier::create_beast2_options()
  filenames <- get_beast2_options_filenames(beast2_options)
  expect_true(beast2_options$input_filename %in% filenames)
  expect_true(beast2_options$output_state_filename %in% filenames)
})
richelbilderbeek/beastier documentation built on Nov. 8, 2023, 9:29 p.m.