tests/testthat/test-empty_plot.R

context("empty_plot")

test_that("empty plot works", {
  skip_on_cran()
  qr_emptyplot <- qr4genebanks:::empty_plot(max_lines = 5)

  vdiffr::expect_doppelganger("Empty plot", qr_emptyplot)
}
)
rsimon64/quagga documentation built on May 5, 2019, 12:31 a.m.