tests/testthat/test-data.R

context("data")

test_that("can retrieve data", {
  data <- read_csv(gonovax_file("extdata/observed_data.csv"))
  expect_equal(gonovax_data(), data)
})
mrc-ide/gonovax documentation built on Dec. 15, 2024, 11:02 a.m.