tests/testthat/test-plot_coverage.R

coverage_plot <- plot_coverage(t_dat, states = t_state_1)

test_that("class is right",
          expect_is(coverage_plot,
                    "ggplot"))

test_that("plot works", 
          vdiffr::expect_doppelganger("plot works", coverage_plot))

Try the HaDeX2 package in your browser

Any scripts or data that you put into this service are public.

HaDeX2 documentation built on Feb. 9, 2026, 5:07 p.m.