r - 进度条在 foreach 设置中不起作用

Question

我在 Ubuntu 系统中有以下foreach设置，我需要一个进度条来监控进度。

library(doMC)
registerDoMC(cores=detectCores()-1)
total <- 9000
# create progress bar
pb <- txtProgressBar(min = 0, max = total, style = 3)
respar <- foreach(i = 1:total, .combine = rbind)%dopar%{
  setTxtProgressBar(pb, i)
  i**3
}
close(pb)

但是，上述实现不起作用，但输出respar符合预期。如果这种方法有问题，您能否发表评论？

注意：问题是确定这种创建进度条的方法中的错误。其他类似的问题没有处理用于创建进度条的背景设置组合。