tests/testthat/test-visualisation.R

test_that("testing visualising path", {
})

test_that("testing visualising crosses", {
})


test_that("testing visualising presence", {
  expect_warning(plot_area_presence(obj))
  
  expect_silent(plt <- plot_area_presence(obj_single))
  expect_s3_class(plt, "ggplot")
})
hejtmy/fgu-avoidance documentation built on Sept. 19, 2021, 6:35 a.m.