add a progress bar for when matching loanbooks takes a bit of time

RMI-PACTA · Aug 12, 2024 · b67d4dc · b67d4dc
2 parents 43a4b39 + 94f13ae
commit b67d4dc
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -15,6 +15,7 @@ Description: This repo allows running PACTA analyses on multiple loan books in a
     exported to specified project paths.
 Encoding: UTF-8
 Imports:
+    cli (>= 3.2.0),
     config,
     dplyr,
     ggplot2,

diff --git a/run_matching.R b/run_matching.R
@@ -168,7 +168,7 @@ raw_lbk <- readr::read_csv(
   dplyr::group_split(.data$group_id)
 
 # match and save loan books----
-for (i in seq_along(raw_lbk)) {
+for (i in cli::cli_progress_along(raw_lbk, "Matching loanbooks")) {
   group_name <- unique(raw_lbk[[i]]$group_id)
 
   ## match data----