Rstudio 载入的utils包自带文字进度条功能。
一共三步,声明,在循环内使用,关闭。
library(utils)
max.block=100
# step1
pb <- txtProgressBar(min = 0, max = max.block, style = 3, file = stderr())
# step2
for (i in 1:max.block) {
Sys.sleep(0.01+runif(1)/10)
setTxtProgressBar(pb = pb, value = i)
}
# step3
close(con = pb)
效果图:

一般放到函数中,并加入 verbose=T 参数。
这三步都分别用 if(verbose){} 包裹。
2. 开始废话。后面的内容请忽略。
文章质量不佳,原因可能为篇幅过短、包含营销性质的广告和二维码或外链过多,建议设置仅我可见,若设置全部可见,推荐可能受影响。
文章质量不佳,原因可能为篇幅过短、包含营销性质的广告和二维码或外链过多,建议设置仅我可见,若设置全部可见,推荐可能受影响。
文章质量不佳,原因可能为篇幅过短、包含营销性质的广告和二维码或外链过多,建议设置仅我可见,若设置全部可见,推荐可能受影响。
文章质量不佳,原因可能为篇幅过短、包含营销性质的广告和二维码或外链过多,建议设置仅我可见,若设置全部可见,推荐可能受影响。

该博客介绍了如何在Rstudio中利用utils包的txtProgressBar函数创建一个文字进度条,用于在循环中显示执行进度。通过三步设置,包括声明、在循环内使用及关闭,可以在运行长时间任务时提供反馈。这个功能可以集成到函数中,并根据verbose参数决定是否显示。
1876

被折叠的 条评论
为什么被折叠?



