tests/testthat/test_time_count.R
In gertstulp/ggzcentraal: Creates Relevant Figures from GGZ-centraal data
test_that("time_count returns appropriate index", {
expect_equal(time_count("2021-09-28 16:27:25"), 0)
expect_equal(time_count("2021-09-28 16:27:25", "day"), 0)
expect_equal(time_count(c("2021-09-28 16:27:25", "2021-10-28 16:27:25")),
c(0, 4))
expect_equal(time_count(c("2021-09-28 16:27:25", "2021-10-28 16:27:25"),
"day"),
c(0, 30))
})
gertstulp/ggzcentraal documentation built on May 23, 2022, 1:10 a.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("time_count returns appropriate index", {
expect_equal(time_count("2021-09-28 16:27:25"), 0)
expect_equal(time_count("2021-09-28 16:27:25", "day"), 0)
expect_equal(time_count(c("2021-09-28 16:27:25", "2021-10-28 16:27:25")),
c(0, 4))
expect_equal(time_count(c("2021-09-28 16:27:25", "2021-10-28 16:27:25"),
"day"),
c(0, 30))
})
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.