我正在多次replicate运行自己的analyse函数(analyse返回列表):
results <- replicate(reps, analyse())
Run Code Online (Sandbox Code Playgroud)
有没有一种方法可以添加进度条,显示当前完成的复制百分比?我已经尝试过了txtProgressBar,但是不知道如何在没有for循环的情况下使它工作。
编辑:的可复制示例 replicate:
analyse <- function() {
out <- list('a' = vector('list', 5), 'b' = vector('list', 5))
}
results <- replicate(3, analyse())
Run Code Online (Sandbox Code Playgroud)
就我而言,输出analyse是带有结果的列表的深层列表。我希望进度栏在每次results填写新列时都更新,因此在每次复制之后。