saveRDS(metadata, file = work_piece[['save_metadata_in']]) } } if (!is.null(work_piece[['progress_amount']]) && !silent) { message(work_piece[['progress_amount']], appendLF = FALSE) } is.null(sub_array) }