Skip to content

Instantly share code, notes, and snippets.

@sahilseth

sahilseth/progress.R

Last active October 19, 2015 17:10
Show Gist options
  • Save sahilseth/31900ecc7b0102449255 to your computer and use it in GitHub Desktop.
Save sahilseth/31900ecc7b0102449255 to your computer and use it in GitHub Desktop.
Download ZIP
progress bar in rstats
Raw
progress.R
mn=1;mx=10
pb <- txtProgressBar(mn, mx, style = 3)
tmp <- lapply(mn:mx, function(x){
pb$up(x)
Sys.sleep(0.5)
#message("I am doing something...")
})
@sahilseth
Copy link
Author 

  |                                                  |   0%
I am doing something...
  |======                                            |  11%
I am doing something...
  |===========                                       |  22%
I am doing something...
  |=================                                 |  33%
I am doing something...
  |======================                            |  44%
I am doing something...
  |============================                      |  56%
I am doing something...
  |=================================                 |  67%
I am doing something...
  |=======================================           |  78%
I am doing something...
  |============================================      |  89%
I am doing something...
  |==================================================| 100%
I am doing something...

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment