This CallbackOptimization writes the Archive after each batch to disk.
clbk("bbotk.backup", path = "backup.rds")