context("Transit Time")
test_that("Times past midnight parse", {
expect_equal(structure(c(as.ITime('1:00'), as.ITime('1:00') + 86400L), class = 'ITime'), as.TransitTime(c('1:00', '25:00')))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.