tests/testthat/test-analysisParameters.R

context('analysisParameters')

test_that('analysisParameters works', {
  p <- analysisParameters()
  expect_true(isS4(p))
  expect_true(class(p) == 'AnalysisParameters')
  expect_equal(slotNames(p),analysisElements())
})
jasenfinch/metabolyseR documentation built on Sept. 18, 2023, 1:25 a.m.