[英]Double R tcltk progress bar
我的問題不是如何創建單個進度條,而是如何創建跟蹤和更新兩個不同過程的進度條。 例如,在同一個窗口中,我希望有一個欄跟蹤當前的模擬索引,而另一個欄跟蹤另一個數字序列...我當前的代碼是:
library(tcltk2)
pb1 <- tkProgressBar(title = "Simulation Progress...", min = 1, max = 10, width = 300)
pb2 <- tkProgressBar(title = "Simulation Progress...", min = 2000, max = 2020, width = 300)
for (index in 1:10){
setTkProgressBar(pb1, index, label = paste("Index",index))
for (year in 2000:2020){
setTkProgressBar(pb2, year, label = paste("Year",year))
}
}
我想將兩個酒吧放在一起,不要分開...任何幫助表示贊賞!
使用tkProgressBar
,您必須深入tcltk
的深度,如下所示:
library(tcltk2)
root <- tktoplevel()
l1 <- tk2label(root,"Simulation Progress...")
pb1 <- tk2progress(root, length = 300)
tkconfigure(pb1, value=0, maximum=9)
l2 <- tk2label(root, "Simulation Progress...")
pb2 <- tk2progress(root, length = 300)
tkconfigure(pb2, value=0, maximum=20, maximum = 20)
tkpack(l1)
tkpack(pb1)
tkpack(l2)
tkpack(pb2)
tcl("update")
for (index in 1:10){
tkconfigure(l1, text = paste("Index", index))
tkconfigure(pb1, value = index - 1)
for (year in 2000:2020){
tkconfigure(l2, text = paste("Year",year))
tkconfigure(pb2, value = year - 2000)
tcl("update")
}
}
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.