tests/testthat/test-grattan_arrow.R

test_that("grattan_arrow plot appears correct", {

expect_equal(
  grattan_arrow(),
  grid::arrow(type = "closed", angle = 20, length = unit(0.5, "lines"))
)

})
MattCowgill/grattantheme documentation built on Jan. 13, 2023, 11:02 a.m.