txtProgressBar 突然停止使用 style=3

AF7*_*AF7 3 r progress-bar

我已经使用了txtProgressBar()一段时间了。从今天开始,如果使用style=3. 它只显示一个空的进度条,并且不会更新。

昨天我更新了一些软件包,但不是utils软件包,AFAIK。也许系统管理员在我不知情的情况下更新了 R。

重现:

for (i in 1:10) {
pb <- txtProgressBar(max = 11, style = 3)
Sys.sleep(1)
setTxtProgressBar(pb, pb$getVal()+1)
}
close(pb)
Run Code Online (Sandbox Code Playgroud)

就我而言,这仅表明:

|                         |   0%
Run Code Online (Sandbox Code Playgroud)

每时每刻。其他样式(1 和 2)效果很好。

我的 R 详细信息:

> R.version
               _                           
platform       x86_64-pc-linux-gnu                                                                                                                                                                                                    
arch           x86_64                                                                                                                                                                                                                 
os             linux-gnu                                                                                                                                                                                                              
system         x86_64, linux-gnu                                                                                                                                                                                                      
status                                                                                                                                                                                                                                
major          3                                                                                                                                                                                                                      
minor          2.2                         
year           2015                        
month          08                          
day            14                          
svn rev        69053                       
language       R                           
version.string R version 3.2.2 (2015-08-14)
nickname       Fire Safety  
Run Code Online (Sandbox Code Playgroud)

是否有我遗漏的东西,也许在我的会话中设置错误的东西,或者这是一个错误?

小智 6

你把它放在循环pb <- txtProgressBar(max = 11, style = 3) 里面。它应该在循环之外,在循环之前。另外,你的说法max也不正确。它应该是 10,因为for循环从 1 到 10。

pb <- txtProgressBar(max = 10, style = 3)
for (i in 1:10) {
  Sys.sleep(0.5)
  setTxtProgressBar(pb, pb$getVal()+1)
}
close(pb)
Run Code Online (Sandbox Code Playgroud)