并行：像pblapply一样使用parLapply时模仿监视

Question

我想知道是否有一种方法可以像pblapply一样使用parLapply（parallel）监视进程。这只是一个简单的代码可以尝试：

library(parallel)
library(pbapply)

f <- function (x) {return <- (x^2)^2}
f.list <- list(50000000:200000000)

# pblapply
f1 <-pblapply(f.list,f)

# parLapply - Usable in linux and windows (slower in windows)
no_cores <- detectCores() - 1 # Calculate the number of cores
cl <- makeCluster(no_cores, type="SOCK") # Initiate cluster
f2 <- parLapply(cl, f.list, f)
stopCluster(cl)

我正在尝试在Linux中（使用并行）在庞大的列表上实现一个过程，但我不知道如何像pblapply这样轻松地查看状态。