一般在跑耗时较长的程序时，我们不知道程序到底有没有正常跑着，或者在爬虫的时候不知道爬到什么时候断了。因此可以添加进度条来显示当前进度，观察进度是否有进展。当进度条卡住的时候，可以判断程序断线，从而可以进行断点重跑。
在R语言中使用 library(tcltk) 加载 tcltk 包可以实现进度条展示。
# 进度条
library(tcltk)
u <- 1:2000 # 开启进度条
pb <- tkProgressBar("进度","已完成 %", 0, 100) for(i in u){
info <- sprintf("已完成 %d%%",round(i*100/length(u)))
setTkProgressBar(pb, i*100/length(u), sprintf("进度 (%s)", info), info)
} # 关闭进度条
close(pb)
效果如下图：
END 2019-02-19 09:05:55