tests/testthat/test_download_ontime.R

library(skynet)

context("Test Download Ontime")

test_that("Download Ontime", {
  skip_on_cran()
  download_ontime(2011, 1)
  expect_output(str(nrow(ontime_2011_1)), "494400")
  expect_length(ontime_2011_1, 26)
})

Try the skynet package in your browser

Any scripts or data that you put into this service are public.

skynet documentation built on June 17, 2022, 5:05 p.m.