tests/testthat/test-correlation_heatmap.R

test_that("correlation_heatmap works", {

  top_targets <- example_targets$top_targets[1:100]
  hm <- correlation_heatmap(top_targets = top_targets)
  testthat::expect_true(methods::is(hm,"Heatmap"))
})
neurogenomics/MultiEWCE documentation built on May 7, 2024, 1:52 p.m.