Nothing
nmTest({
test_that("nlmixr3 fit loads", {
fit <- readRDS(system.file("testfit_nlmixr3.rds", package = "nlmixr2est"))
expect_error(rxode2::rxSolve(fit))
expect_snapshot(
fit <- suppressMessages(nlmixr2fix(fit))
)
expect_error(rxode2::rxSolve(fit), NA)
})
})
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.