tests/testthat/test_pgfunctions.R

test_that("Blank priogrid is right size",{
   grid <- priogrid::prio_blank_grid()
   expect_equal(length(grid), 259200)
})
prio-data/priogrid documentation built on April 3, 2020, 6:37 p.m.