在 R 语言中,可以使用 'pbapply' 包来为循环添加进度条。

首先需要安装 'pbapply' 包:

install.packages('pbapply')

然后在循环中使用 'pblapply'、'pbmapply'、'pbapply' 等函数,其中 'pblapply' 适用于列表、'pbmapply' 适用于矩阵、'pbapply' 适用于向量等。

举个例子,在一个向量中进行循环并添加进度条:

library(pbapply)

my_vector <- 1:1000

pbapply(my_vector, FUN = function(x) {
  Sys.sleep(0.01) # 模拟运算时间
  return(x*2)
})

上述代码中,使用 'pbapply' 函数对 'my_vector' 进行循环,并使用 'Sys.sleep' 函数模拟每次运算需要 0.01 秒的时间。在控制台中,将会出现进度条和完成百分比的提示信息,如下所示:

  |======================================================================| 100%

提示信息中的百分比表示已经完成的比例,进度条则表示整个循环的进度。

R语言循环进度条:使用 pbapply 包

原文地址: https://www.cveoy.top/t/topic/lCoM 著作权归作者所有。请勿转载和采集!

免费AI点我,无需注册和登录