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.
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
