tests/testthat/test_handle_negative_dates.R

context('Handling NEGATIVE dates')



test_that('Is handle_negative_dates(y,m,d) working properly ?', {


        expect_is(handle_negative_dates(-2017, 07, 19), "Date")
        expect_is(handle_negative_dates(-1, 01, 1), "Date")
})
Brunobt80/rPkgNOAADataset documentation built on May 20, 2019, 12:57 a.m.