p <- pipe_new("pipe", data = 1)
pipe_add(p, "add1", \(x = ~data, y = 2, z = 3) x + y)
pipe_set_params_at_step(p, step = "add1", params = list(y = 5, z = 6))
pipe_get_params(p)
try(
pipe_set_params_at_step(p, step = "add1", params = list(foo = 3))
)
Run the code above in your browser using DataLab