Nothing
tests/testthat/test-derive_var_trtdurd.R
In admiral: ADaM in R Asset Library
test_that("TRTDURD is added", {
input <- tibble::tribble(
~TRTSDT, ~TRTEDT,
ymd("2020-01-01"), ymd("2020-02-24")
)
expected_output <- mutate(input, TRTDURD = 55)
expect_equal(derive_var_trtdurd(input), expected_output)
})
Try the admiral package in your browser
Any scripts or data that you put into this service are public.
admiral documentation built on May 28, 2026, 9:08 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("TRTDURD is added", {
input <- tibble::tribble(
~TRTSDT, ~TRTEDT,
ymd("2020-01-01"), ymd("2020-02-24")
)
expected_output <- mutate(input, TRTDURD = 55)
expect_equal(derive_var_trtdurd(input), expected_output)
})
Try the admiral package in your browser
Any scripts or data that you put into this service are public.
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.