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. 开始废话。后面的内容请忽略。
文章质量不佳,原因可能为篇幅过短、包含营销性质的广告和二维码或外链过多,建议设置仅我可见,若设置全部可见,推荐可能受影响。
文章质量不佳,原因可能为篇幅过短、包含营销性质的广告和二维码或外链过多,建议设置仅我可见,若设置全部可见,推荐可能受影响。
文章质量不佳,原因可能为篇幅过短、包含营销性质的广告和二维码或外链过多,建议设置仅我可见,若设置全部可见,推荐可能受影响。
文章质量不佳,原因可能为篇幅过短、包含营销性质的广告和二维码或外链过多,建议设置仅我可见,若设置全部可见,推荐可能受影响。