Nothing
# test_that("devRateFindStartNls returns NULL",{
# res <- devRateFindStartNls(temp=10:15, devRate=c(0.1, 0.2, 0.3, 0.4, 0.5, 0.6), eq = campbell_74)
# expect_equal(
# object = res,
# expected = NULL
# )
# })
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.