Nenhuma chave conhecida encontrada para esta assinatura no banco de dados
ID da chave GPG: 1D7529BE14E2BBA9
1 arquivos alterados com
0 adições e
4 exclusões
-
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")) |
|
|
|