Nothing
targets::tar_test("tar_skip() can cancel", {
tar_script({
list(
tarchetypes::tar_skip(x, command = "value", skip = 1 > 0)
)
})
targets::tar_make(callr_function = NULL)
store <- targets::tar_config_get("store")
path <- targets::tar_path_target(name = "x", store = store)
expect_false(file.exists(file.path(path)))
})
targets::tar_test("tar_skip() does not always cancel", {
tar_script({
list(
tarchetypes::tar_skip(x, command = "value", skip = 1 < 0)
)
})
targets::tar_make(callr_function = NULL)
expect_equal(targets::tar_read(x), "value")
})
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.