Nothing
context("ppl - pipeline_greplicate")
test_that("Greplicate Pipeline", {
op_ds = PipeOpSubsample$new()
g = pipeline_greplicate(op_ds, n = 3L)
expect_graph(g)
expect_character(g$ids(), len = 3L)
expect_equal(names(g$pipeops), c("subsample_1", "subsample_2", "subsample_3"))
})
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.