Przeglądaj źródła

10th times a charm?

pull/20/head
boB Rudis 5 lat temu
rodzic
commit
7aa4ea43bb
Nie znaleziono w bazie danych klucza dla tego podpisu ID klucza GPG: 1D7529BE14E2BBA9
  1. 4
      tests/testthat/test-cdcfluview.R

4
tests/testthat/test-cdcfluview.R

@ -18,10 +18,6 @@ test_that("New API works", {
nat_dat <- ilinet(region="national", years=1997:2018)
expect_equal(unique(diff(nat_dat$week_start)), 7)
expect_equal(
as.character(unique(lubridate::wday(unique(nat_dat$week_start), label=TRUE))),
"Sun"
)
expect_that(ilinet("national", years=2017), is_a("data.frame"))
expect_that(ilinet("hhs", years=2017), is_a("data.frame"))

Ładowanie…
Anuluj
Zapisz