Buenas tardes: ¿Cuál es el modo más adecuado de incorporar una barra de progreso en la ventana de comandos?. Es para acompañar a un proceso de lectura de ficheros de datos... Necesitaba que la solución fuese multiplataforma. Gracias. Un saludo. Eva [[alternative HTML version deleted]]
# Fuente: http://ryouready.wordpress.com/2009/03/16/r-monitor-function-progress-with-a-progress-bar/ library(utils) total <- 20 # create progress bar pb <- txtProgressBar(min = 0, max = total, style = 3) for(i in 1:total){ Sys.sleep(0.1) # update progress bar setTxtProgressBar(pb, i) } close(pb) library(tcltk) total <- 20 # create progress bar pb <- tkProgressBar(title = "progress bar", min = 0, max = total, width = 300) for(i in 1:total){ Sys.sleep(0.1) setTkProgressBar(pb, i, label=paste( round(i/total*100, 0), "% done")) } close(pb) sessionInfo() R version 3.0.1 (2013-05-16) Platform: i386-w64-mingw32/i386 (32-bit) locale: [1] LC_COLLATE=Spanish_Argentina.1252 LC_CTYPE=Spanish_Argentina.1252 [3] LC_MONETARY=Spanish_Argentina.1252 LC_NUMERIC=C [5] LC_TIME=Spanish_Argentina.1252 attached base packages: [1] tcltk stats graphics grDevices utils datasets methods [8] base Eva, me inclinaría por adaptar el primero. Supongo que su utilidad/uso dependerá de como puedas integrar la lectura de datos en un loop. Daniel Merino El 18 de junio de 2013 13:43, Eva Prieto Castro <evapcastro@yahoo.es>escribió:> > > Buenas tardes: > > ¿Cuál es el modo más adecuado de incorporar una barra de progreso en la > ventana de comandos?. Es para acompañar a un proceso de lectura de ficheros > de datos... > > Necesitaba que la solución fuese multiplataforma. > > Gracias. > > Un saludo. > > Eva > > [[alternative HTML version deleted]] > > > _______________________________________________ > R-help-es mailing list > R-help-es@r-project.org > https://stat.ethz.ch/mailman/listinfo/r-help-es > >-- Daniel [[alternative HTML version deleted]]
Gracias, Daniel!. No veo claro cómo adaptarlo (en mi caso se trata de un apply de tal modo que para cada item de la lista leo el fichero de datos cuyo nombre se indica, y en total leo tantos ficheros como elementos hay en la lista). Le daré una vuelta a ver si consigo aplicarlo bien y si no en tal caso os consulto. Saluditos! Eva ________________________________ De: daniel <daniel319@gmail.com> CC: "R-help-es@r-project.org" <R-help-es@r-project.org> Enviado: Martes 18 de junio de 2013 19:20 Asunto: Re: [R-es] Barra de progreso # Fuente: http://ryouready.wordpress.com/2009/03/16/r-monitor-function-progress-with-a-progress-bar/ library(utils) total <- 20 # create progress bar pb <- txtProgressBar(min = 0, max = total, style = 3) for(i in 1:total){ Sys.sleep(0.1) # update progress bar setTxtProgressBar(pb, i) } close(pb) library(tcltk) total <- 20 # create progress bar pb <- tkProgressBar(title = "progress bar", min = 0, max = total, width = 300) for(i in 1:total){ Sys.sleep(0.1) setTkProgressBar(pb, i, label=paste( round(i/total*100, 0), "% done")) } close(pb) sessionInfo() R version 3.0.1 (2013-05-16) Platform: i386-w64-mingw32/i386 (32-bit) locale: [1] LC_COLLATE=Spanish_Argentina.1252 LC_CTYPE=Spanish_Argentina.1252 [3] LC_MONETARY=Spanish_Argentina.1252 LC_NUMERIC=C [5] LC_TIME=Spanish_Argentina.1252 attached base packages: [1] tcltk stats graphics grDevices utils datasets methods [8] base Eva, me inclinaría por adaptar el primero. Supongo que su utilidad/uso dependerá de como puedas integrar la lectura de datos en un loop. Daniel Merino bió:> >Buenas tardes: > >¿Cuál es el modo más adecuado de incorporar una barra de progreso en la ventana de comandos?. Es para acompañar a un proceso de lectura de ficheros de datos... > >Necesitaba que la solución fuese multiplataforma. > >Gracias. > >Un saludo. > >Eva > > [[alternative HTML version deleted]] > > >_______________________________________________ >R-help-es mailing list >R-help-es@r-project.org >https://stat.ethz.ch/mailman/listinfo/r-help-es > >-- Daniel [[alternative HTML version deleted]]
Si vas a trabajar en ambiente windows http://ryouready.wordpress.com/2010/01/11/progress-bars-in-r-part-ii-a-wrapper-for-apply-functions/#comment-260 Prof. Julio Di Rienzo Estadística y Biometría FCA- U.N. Córdoba IBS-RARG President http://sites.google.com/site/juliodirienzo "Biometry, the active pursuit of biological knowledge by quantitative methods." (R.A. Fisher, 1948) 2013/6/18 Eva Prieto Castro <evapcastro@yahoo.es>> > > Buenas tardes: > > ¿Cuál es el modo más adecuado de incorporar una barra de progreso en la > ventana de comandos?. Es para acompañar a un proceso de lectura de ficheros > de datos... > > Necesitaba que la solución fuese multiplataforma. > > Gracias. > > Un saludo. > > Eva > > [[alternative HTML version deleted]] > > > _______________________________________________ > R-help-es mailing list > R-help-es@r-project.org > https://stat.ethz.ch/mailman/listinfo/r-help-es > >[[alternative HTML version deleted]]