language - Cómo ser alertado sobre el progreso continuo de un ciclo/lapply

r language apply data frame

Question

En R , a veces tendré un for loop largo o lapply que quiero saber el progreso continuo de.

Algo como lo siguiente está en el espíritu de lo que quiero pero no funciona:

lapply(1:n,function(i) { print(i); MAIN COMPUTATIONS })

Idealmente, lo anterior imprimiría i al comienzo de cada nueva iteración de la lapply .

PREGUNTA: ¿Cómo obtengo actualizaciones de progreso continuas sobre cuántas repeticiones ha realizado mi lapply o for loop ?

Answer 1

También es posible que desee ver las funciones como winProgressBar , tkProgressBar o txtProgressBar . Las versiones de Windows y TK son agradables, ya que pueden mostrarle su progreso, pero no desordenan su salida.

Answer 2

Parece que estás usando RGui en Windows. Debería haber una opción en uno de los menús para indicarle que no almacene la salida. Alternativamente, puede llamar a flush.console cada vez que imprima.

lapply(1:1000, function(i){print(i); flush.console()})

Tenga en cuenta que esto ralentizará un poco el código.

Answer 3

Una solución que usa plyr

 l_ply(1:10,function(x) x+1,.progress=''text'')

o puedes definir tu progreso usando progress_text

 l_ply(1:10000,function(x) x+1,.progress= progress_text(char = ''*''))
|*********************************************************************| 100%

o con la opción imprimir, para obtener el resultado de cada iteración

     l_ply(1:4,function(x) x+1,.progress= progress_text(char = ''+''),.print=TRUE)
  |                                 |   0%[1] 2
  |++++++                           |  25%[1] 3
  |+++++++++++++++                  |  50%[1] 4
  |++++++++++++++++++++++           |  75%[1] 5
  |++++++++++++++++++++++++++++++++ |  100%[1]