<p>barra de progreso con el paquete doMC?</p>

¿O el paquete paralelo? Si no es así, haga +1 para esta función.

Para ser honesto, no estoy seguro de qué se necesitaría para implementar esto. Por ejemplo, para el paralelo, se necesitaría el paralelo para comunicar cuánto del trabajo ya se ha realizado. ¿Es eso siquiera posible?

@gaborcsardi Hice algunas búsquedas y lo siguiente es lo que encontré:

library("foreach")
library("doParallel")
library("progress")

registerDoParallel(parallel::makeCluster(7, outfile = ""))

pb <- progress_bar$new(
            format = " [:bar] :percent in :elapsed",
            total = 30, clear = FALSE, width = 80, force = T)
a <- foreach (i  = 1:30) %dopar% {
    pb$tick()
    Sys.sleep(0.5)
}


pb <- txtProgressBar(title = "Iterative training", min = 0, max = 30, style = 3)

foreach (i  = 1:30) %dopar% {
    setTxtProgressBar(pb, i)
    Sys.sleep(0.5)
}

stopCluster(cl)

El txtProgressBar solo funciona cuando el tipo es 2 o 3. Según el manual de la función:

style = 1 y style = 2 solo muestra una línea de char. Se diferencian en que el estilo = 2 vuelve a dibujar la línea cada vez, lo cual es útil si otro código puede estar escribiendo en la consola R. style = 3 marca el final del rango con | y da un porcentaje a la derecha de la barra.

Creo que la razón por la que txtProgressBar funciona es porque el outfile = "" existe mientras se hace el clúster.

Creo que imitar lo que hace txtProgressBar para el estilo 2 resolvería esto.