r - 添加进度条以复制R中的功能

我正在使用replicate多次运行自己的analyse函数(analyse返回列表):

results <- replicate(reps, analyse())

有没有一种添加进度条的方式来显示当前完成的复制百分比？我已经尝试过txtProgressBar，但是不知道如何在没有for循环的情况下使它工作。

编辑:replicate:的可复制示例

analyse <- function() {
  out <- list('a' = vector('list', 5), 'b' = vector('list', 5))
}
results <- replicate(3, analyse())

就我而言，analyse的输出是带有结果的列表的深层列表。我希望进度栏在每次填充新的results列时更新，因此在每次复制之后。

最佳答案

解决方案是使用pbreplicate()包中的pbapply函数。此软件包还包含apply()，lapply()和sapply()的相应进度栏功能。