コードを実行しているときにループ出力を停止する

Question

コード内のポイントは、Facebookページから投稿を集めてmy_pageに保存することですが、Uniプロジェクトの場合のようにコードに慣れていません。私が持っている問題は、Rstudioを使用して作成された.rpres形式で使用する必要があり、出力を必要としませんがコードを実行する必要があるということです。

これは私が望んでいない出力が表示される：それは実行時に

```{r, echo = FALSE} 

#install.packages("Rfacebook") 

include(Rfacebook) 

token <- "Facebook dev auth token goes here" 

page_name <- "BuzzFeed" 

my_page <- getPage(page_name, token, n = 2,reactions = TRUE,api = "v2.10") 

number_required <- 50 

dates <- seq(as.Date("2017/07/14"), Sys.Date(), by = "day") 

# 
n <- length(dates) - 1 

df_daily <- list() 

for (i in 1:n){ 

cat(as.character(dates[i]), " ") 

try(df_daily[[i]] <- getPage(page_name, token, 
          n = number_required,reactions = TRUE,api = "v2.10", 
          since = dates[i], 
          until = dates[i+1])) 

cat("\n") 
} 
``` 

Answer 1

あなたの問題は、単にコンソールへのRfacebook::getPage版画です。これはcat()と呼ばれ、print()と同じものです。幸いなパッケージはそれをオフにするスイッチを提供します - あなたがする必要があるすべてはあなたの呼び出しにverbose = FALSE引数を追加し、それが印刷を停止します次のとおりです。

getPage(...) 
getPage(..., verbose = FALSE) 

それはcatかprintを呼び出すためのパッケージのためのかなり悪い習慣です - 彼らは代わりにmessageとwarningを使用する必要があります - あなたが好きならば、あなたがここに見ることができ、変更するので、私はこのために依頼するパッケージメンテナの問題を提起している：

https://github.com/pablobarbera/Rfacebook/issues/145