Nothing
## Started 2022-11-20
## tests of derived quantities
library(secr)
## to avoid ASAN/UBSAN errors on CRAN, following advice of Kevin Ushey
## e.g. https://github.com/RcppCore/RcppParallel/issues/169
Sys.setenv(RCPP_PARALLEL_BACKEND = "tinythread")
test_that("correct chat.nk ovenbird.model.1", {
expect_equal(sapply(chat.nk(ovenbird.model.1), '[[', 'chat'),
c(0.8312778, 1.7388806, 1.3127876, 1.2391087, 1.1826071),
tolerance = 1e-5, check.attributes = FALSE)
})
test_that("correct derived density secrdemo.CL", {
expect_equal(derived(secrdemo.CL)['D',],
c(5.4798074, 0.64455399, 4.3549958, 6.8951362, 0.11470787, 0.026026665, 0.11762348),
tolerance = 1e-6, check.attributes = FALSE)
})
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.