我在用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()
and sapply()
.
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)