Is there any way to get a progress bar for the imputation progress in the command line version of Amelia?  I'd like to be able to estimate how long the whole imputation process will take.  For loops, one can use the following for a progress bar:

pb <- txtProgressBar(min = 0, max = 999999, style = 3)

for (i in 1:999999){
  setTxtProgressBar(pb, i)
}

Is there an option to get a progress bar for a single or multiple imputations in the command line version of Amelia?

Thanks!