tests/testthat/test-e_to_x.R

test_that("loading the phi constants table works as expected", {
  phi_table <- load_phi_constants_table()
  colnames <- phi_table %>%
    names()
  expect_equal(colnames, c("Product", "phi", "is.useful"))
})
MatthewHeun/IEATools documentation built on Feb. 6, 2024, 3:29 p.m.