test_that("Returns an error when unknown method is given", {
expect_error(
eval(parse(
text =
"CroptimizR:::optim_switch(optim_method=\"unknown_method\",
optim_options=NULL, param_info=NULL,
crit_options=NULL)"
)),
"Unknown method"
)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.