p <- pipe_new("pipe", data = 1:2)
pipe_add(p, "add1", \(data = ~data, x = 1) x + data)
pipe_add(p, "add2", \(x = 1, y = ~add1) x + y)
p
try(pipe_rename_step(p, from = "add1", to = "add2"))
pipe_rename_step(p, from = "add1", to = "first_add")
p
Run the code above in your browser using DataLab