Nothing
test_that("makeResampleDesc", {
desc1 = makeResampleDesc("CV", predict = "test", iters = 2)
expect_equal(desc1$iters, 2)
expect_equal(desc1$predict, "test")
expect_error(makeResampleDesc("Foo", predict = "test", iters = 2),
"Assertion on 'method' failed: Must be element of set")
expect_error(makeResampleDesc("CV", predict = "Foo", iters = 2),
"Assertion on 'predict' failed: Must be element of set")
})
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.