Warning: file_get_contents(/data/phpspider/zhask/data//catemap/3/sockets/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在R中使用file（）无限期地保持连接打开_R_Sockets_Connection - Fatal编程技术网
Fatal编程技术网
  • r/
  • 在R中使用file（）无限期地保持连接打开

在R中使用file（）无限期地保持连接打开

r sockets

在R中使用file（）无限期地保持连接打开,r,sockets,connection,R,Sockets,Connection,我有这个功能，可以将推特上的流数据写入一个文件12小时，然后写入另一个文件12小时。这样我们就可以每天清理、解析和存储两次数据 conn <- file(description = "after12.json", open = "a") conn2 <- file(description = "before12.json", open = "a") write.tweets <- function(x) { if (nchar(x) > 0 && fo

我有这个功能，可以将推特上的流数据写入一个文件12小时，然后写入另一个文件12小时。这样我们就可以每天清理、解析和存储两次数据

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 = "")
  }
}

conn使用
open


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



conn