tests/testthat/test-list_onsets.R

test_that("list_onsets works", {

  onsets <- list_onsets()
  testthat::expect_length(onsets,12)

  onsets <- list_onsets(exclude = c("Antenatal","Fetal"),
                        include_na = FALSE)
  testthat::expect_length(onsets,9)
})
neurogenomics/HPOExplorer documentation built on Aug. 24, 2024, 1:39 a.m.