tests/testthat/test_geoms_image.R

In chronochrt: Creating Chronological Charts

# Visual tests ------------------------------------------------------------
test_that("geom_image", {
  expect_doppelganger("image",
                      ggplot(test_images_reference) + geom_chronochRtImage(aes(y = year, x = position, image_path = image_path))
  )
})