[R] A question about "txtProgressBar" function

[Berend Hasselman]

Li, Yunfei wrote:
> 
> Hi,
> 
> I tried to add a progress bar to my script, but it seems the
> "txtProgressBar" function will wipe out what I want to print before it(for
> example - the "Hello" in following script), and the parameters "title" and
> "label" do not work either. How can I put a title for the progress bar? or
> is there any other better function I can use?
> 
> testit <- function(total =20)
> {
> cat("Hello\n")	
> 
> # create progress bar
> pb <- txtProgressBar(min = 0, max = total, style =
> 3,title="ProgressBar1",label="ProgressBar2")
> for(i in 1:total){
>    Sys.sleep(0.1)
>    # update progress bar
>    setTxtProgressBar(pb, i)
> }
> close(pb)
> }
> testit()
> 

Are running your script in Mac OS X or Windows GUI?

?flush.console

Replace cat(...) with  cat("Hello\n"); flush.console()

Berend


--
View this message in context: http://r.789695.n4.nabble.com/A-question-about-txtProgressBar-function-tp3437902p3438040.html
Sent from the R help mailing list archive at Nabble.com.