Nothing
context("utils")
test_that("warns if all dates are missing", {
c1 <- fgeo.x::tree5
c2 <- fgeo.x::tree6
c1$date <- NA
c2$date <- NA
expect_warning(time_diff(c1, c2), "all missing")
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.