tests/testthat/test-average_measure.R

test_that("average_measure", {
  test <- average_measure(usa_covid_data, "tot_cases")
  expect_null(average_measure(usa_covid_data, "total_cases"))
  expect_equal(ncol(test), 3)
  expect_error(average_measure("tot_cases"))
})
etc5523-2020/r-package-assessment-AbhishekSinha28 documentation built on Jan. 1, 2021, 1:09 a.m.