Nothing
test_that("Full function test", {
testthat::skip_on_cran()
local_edition(3)
##load Example dataset
data("Example_Data", envir = environment())
##simple run to check the 'ref' fall back
expect_type(RCarb:::.calc_DoseRate(x = 10, data = Example_Data[14, ], ref = NULL),
type = "list")
})
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.