tests/testthat/test-count_donations.R

test_that("counting donations works", {
  x <- count_donations(donations_test_data)

  expect_equal(nrow(x), 8)
  expect_named(x, c("sector", "donations"))
})
emptyfield-ds/r_packages_add_files documentation built on Jan. 2, 2022, 12:14 a.m.