tests/testthat/tests_dates.R

expect_that(adjusted_data('COSUMAR', '01/01/2011', '01/01/2014'),
            throws_error())

expect_that(adjusted_data('COSUMAR', '01/01/2011', '31/12/2013'),
            is_a('data.frame'))

expect_that(adjusted_data('COSUMAR', '01-01-2011', '01-01-2014'),
            throws_error())

expect_that(adjusted_data('COSUMAR', '2010/01/01', '2011/02/28'),
            throws_error())

expect_that(adjusted_data('COSUMAR', '01/30/2011', '02/28/2011'),
            throws_error())
blnash508/cfm documentation built on May 30, 2019, 4:31 p.m.