tests/testthat/test-list_mutations.R

test_that("listing mutations work", {
  dir <- paste0("../testdata/GRETTA_example/")
  df <- list_mutations(gene = "ARID1A", data_dir = dir)
  expect_equal(nrow(df), 458)
})
ytakemon/GINIR documentation built on Jan. 27, 2025, 4:22 a.m.