Просмотр исходного кода

10th times a charm?

pull/20/head
boB Rudis 2 лет назад
Родитель
Сommit
7aa4ea43bb
Не найден GPG ключ соответствующий данной подписи Идентификатор GPG ключа: 1D7529BE14E2BBA9
1 изменённых файлов: 0 добавлений и 4 удалений
  1. +0
    -4
      tests/testthat/test-cdcfluview.R

+ 0
- 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"))


Загрузка…
Отмена
Сохранить