は状態メッセージをR

Question

に表示しています。時間、完了パーセント、プロセスの現在のステータスなどのステータスメッセージをユーザーに提示する関数を記述したいと思います。私はメッセージの組み立てを扱うことができますが、コンソールに印刷してスクロールアップする以外の何かをしたいと思います。 message()のようなスクロールせずに、グラフィックスを使わずにメッセージを変更したいと本当に思います。これはRで可能ですか？

Answer 1

このような場合はどうですか？

for(i in 1:10) { 
    Sys.sleep(0.2) 
    # Dirk says using cat() like this is naughty ;-) 
    #cat(i,"\r") 
    # So you can use message() like this, thanks to Sharpie's 
    # comment to use appendLF=FALSE. 
    message(i,"\r",appendLF=FALSE) 
    flush.console() 
} 

Answer 2

あり、これを行うために、よりエレガントな方法かもしれないが、これはそれを行うことができます：

test.message <- function() { 
    for (i in 1:9){ 
    cat(i) 
    Sys.sleep(1) 
    cat("\b") 
    } 

} 

あなたは自動的にあなたのメッセージを生成している場合、あなたはどのように多くの\ B文字を計算する必要があります正しい量をバックアップするために出力するが、それはかなり簡単である。

Answer 3

utilsパッケージには、txtProgressBarとそれを更新するための関数が含まれています。この関数を使用して、プロセスの完了率を示すことができます。

は更新がコンソールをスクロールせずに処理する方法の例については、txtProgressBarの呼び出し中に作成されup1、up2とup3機能を参照してください。

Answer 4

ここにいくつかのブリングブリングがあります。 ?tcltk::tkProgressBarから。

pb <- tkProgressBar("test progress bar", "Some information in %", 
     0, 100, 50) 
Sys.sleep(0.5) 
u <- c(0, sort(runif(20, 0 ,100)), 100) 
for(i in u) { 
    Sys.sleep(0.1) 
    info <- sprintf("%d%% done", round(i)) 
    setTkProgressBar(pb, i, sprintf("test (%s)", info), info) 
} 
Sys.sleep(5) 
close(pb)