cp_dir <- tempdir()
cp_id <- "pc-doc-example"
pc_batch(
ids = 1:4,
fn = function(chunk_ids, ...) sum(chunk_ids),
chunk_size = 2,
checkpoint_dir = cp_dir,
checkpoint_id = cp_id
)
resumed <- pc_resume_batch(
fn = function(chunk_ids, ...) sum(chunk_ids),
checkpoint_dir = cp_dir,
checkpoint_id = cp_id
)
resumed$checkpoint$resumed
Run the code above in your browser using DataLab