Nothing
context("get / print options")
test_that("get / print options", {
opts = parallelGetOptions()
expect_true(is.list(opts))
expect_equal(names(opts), c("settings", "defaults"))
expect_equal(names(opts$settings), names(opts$defaults))
capture.output(
print(parallelGetOptions())
)
})
# issue https://github.com/mlr-org/parallelMap/issues/41
test_that("parallelGetOptions() prints the state of the object", {
parallelStartSocket(2)
y = parallelGetOptions()
parallelStop()
expect_match(
capture.output(print(y))[3],
"mode : socket \\(not 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.