1

Twitter からのストリーミング データを 1 つのファイルに 12 時間書き込んだ後、別のファイルに 12 時間書き込む機能があります。これは、データを 1 日に 2 回クリーニング、解析、保存できるようにするためです。

conn <- file(description = "after12.json", open = "a")
conn2 <- file(description = "before12.json", open = "a")
write.tweets <- function(x) {
  if (nchar(x) > 0 && format(Sys.time(), " %H") >= 12){
    writeLines(x, conn, sep = "")
  } else {
    writeLines(x, conn2, sep = "")
  }
}

これは、データをプルして書き込むためのより大きな関数内にあります。私の質問はとても簡単です。非アクティブ状態が 12 時間続いた後に接続を呼び出せるように、両方の接続を無期限に開いたままにしたいと考えています。これを行う方法はありますか？

4

1 に答える 1

2

使用するopen

conn <- file(description = "after12.json")
open(conn, open = "a")

に従って?open：

open は接続を開きます。一般に、接続を使用する関数は、開いていない場合はそれらを開きますが、再度閉じます。したがって、接続を開いたままにしておくには、明示的に open を呼び出します。

于 2013-04-03T04:20:19.487 に答える