tests/testthat/test-is_time_series_data_frame.R

test_that("can find numeric columns", {
  d <- data.frame(
    date = c(lubridate::ymd("2018-01-01"), lubridate::ymd("2018-01-02")),
    number = c(1, 2)
  )

  expect_true(is_time_series_data_frame(d))
})

Try the tsviz package in your browser

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

tsviz documentation built on July 26, 2019, 5:03 p.m.