Nothing
#! This file was automatically produced by the testextra package.
#! Changes will be overwritten.
context('tests extracted from file `apply.R`')
#line 85 "R/apply.R"
test_that('with_apply_progress', {#@testing
val <- sapply( 1:5, with_progress( test_progress_status
, label="{frac} items completed"
, type="none")
, total=5
, title = "sapply"
, label = "\\d/5 items completed")
expect_true(all(val))
})
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.