tests/testthat/test-dateOps.R
In West-End-Statistics/r-library-vakdr: Miscellanious helper functions
test_that("pretty_date works", {
date1 <- as.Date('2020-08-11')
expect_equal(pretty_date(date1), "August 11th, 2020")
expect_equal(pretty_date(date1, month_code = "%b."),
"Aug. 11th, 2020")
# error when non-date passed
expect_error(pretty_date('2021-08-11'))
})
West-End-Statistics/r-library-vakdr documentation built on Dec. 18, 2021, 7:16 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
test_that("pretty_date works", {
date1 <- as.Date('2020-08-11')
expect_equal(pretty_date(date1), "August 11th, 2020")
expect_equal(pretty_date(date1, month_code = "%b."),
"Aug. 11th, 2020")
# error when non-date passed
expect_error(pretty_date('2021-08-11'))
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.