在R中每5秒更新一次数据

Question

我需要每5秒更新一次数据，在搜索之后，我发现如何每5秒运行一次函数，但无法弄清楚如何更新数据格式，比如每5秒重复一次rbind()。

下面是我尝试的R-脚本

library(tcltk2)

 mydata <- data.frame()
 string_val <- "Hello World"

 fupdate <- function(){
        rbind(mydata , string_val)
       }

 tclTaskSchedule(5000, fupdate(), id = "fupdate", redo = TRUE)

我引用了这个link来重新运行这些函数。

Answer 1

我是tcltk2包的新手，但我相信您可以做以下工作：

library(tcltk2)

mydata <- data.frame()
string_val <- data.frame(text ="Hello World")

fupdate <- function(){
  if (nrow(mydata)==0)
    mydata <<- string_val
  else
    mydata <<- rbind(mydata , string_val)
}

tclTaskSchedule(1000, fupdate(), id = "fupdate", redo = 10)
tclTaskRun('fupdate')

注意，要重新绑定，需要有两个data.frames，而不是一个data.frame和一个string，所以我修改了string_val变量。要连续更新mydata，我们可以使用<<-操作符，它将写回父环境。

希望这能有所帮助！