tests/testthat/test-filter.R

test_that("filter_data", {
  expect_equal(filter_data(tb, "US"),
               covid19_time %>%
                 dplyr::filter(country == "US"
                            ))

  expect_error(filter_data(tb, "US"))

})
etc5523-2020/r-package-assessment-KarinaZou documentation built on Jan. 1, 2021, 1:10 a.m.