抑制メッセージではなく、私は現在、次のヘッダ使用

Question

Rコンソールでこのコードチャンク内部

```{r, message=FALSE} 
foo <- function(x) message(x) 
for(i in 1:10) foo(i) 
``` 

は、シミュレートされたシナリオをループが現在実行シナリオのステータスを印刷message()機能と、あります。

これらのメッセージをRStudioと最終的なHTML出力に表示しないようにしたいのですが、シミュレーションの進行状況を制御してコンソールでmessage()の出力を見たいと思っています。これは達成可能ですか？たぶん、他の引数/関数ですか？

Answer 1

ステータスをファイルに書き込むことができます（これは回避策ですが、より直接的な回答が必要です）。例えば

：この例のメッセージで

file <- file("status.txt", open = "wt") 
sink(file, type = "message") 
message("all good") 

は表示されません - それはstatus.txtファイルに書き込まれます。

はあなたがこの例を試すことができ、特定の機能を使用して、設定を反復処理している場合：

foo <- function(x) { 
    message(x) 
} 

file <- file("status.txt", open = "wt") 
sink(file, type = "message") 
for(i in 1:3) { 
    foo(i) 
} 

機能fooを（メッセージ）の値を返す必要があります、しかし、それはstatus.txtファイルに追加します。

status.txtファイルの変更を、-f引数のbash tailコマンドを使用して追跡できます。最初にRをバックグラウンドに送信し、コンソールでtail -f status.txtを使用します。

Answer 2

1つの方法は、これをファイルの先頭に挿入することです。

mymessage <- function (text) { 
    if(knitr::opts_knit$get('out.format') != NULL) message(text) 
} 

あなたがknitr内にある場合、最近のバージョンはknitr::is_latex_outputと同様のを知っているために、様々な方法があります。