将数据附加到R Automation中具有当前日期的现有数据

将数据附加到R Automation中具有当前日期的现有数据,r,dplyr,plyr,tidyr,R,Dplyr,Plyr,Tidyr,我有一个CSV文件,它有两列名称和编号,这个CSV每天都会生成,我想要的是有一个单一的变量,并将我每天获得的数据与当前日期一起附加到这个变量中,以便记录。 需要将此过程自动化为日常任务。 下面是我所做的 假设这是第一个数据 name number 1 a 1 2 b 2 3 c 3 4 d 4 5 e 5 6 f 6 以这种方式将日期添加

我有一个CSV文件,它有两列名称和编号,这个CSV每天都会生成,我想要的是有一个单一的变量,并将我每天获得的数据与当前日期一起附加到这个变量中,以便记录。 需要将此过程自动化为日常任务。 下面是我所做的

假设这是第一个数据

   name  number  
1    a      1    
2    b      2    
3    c      3    
4    d      4    
5    e      5    
6    f      6     
以这种方式将日期添加到此数据

   df <- cbind(df,Date = march8)  //march8 has date of this day
现在我想把当前日期的另一个数据附加到这个数据上

我的新数据

   name  number 
1    l      3 
2    c      4 
3    a      5 
4    c      6 
5    d      4 
6    g      2
再次添加日期

df1 <- cbind(df1,Date = Sys.Date())
最后

 df <- rbind(df,df1)
每天都这样做,有没有更好的方法来自动化整个过程。 希望我的问题清楚易懂,很抱歉发了这么长的问题


谢谢。

如果它应该在服务器上运行,请尝试每天使用Linux cron之类的工具调用bash脚本。在bash脚本中,您可以调用Rscript将新数据附加到csv文件。

示例数据和设置wd()

首次使用write.csv写入

  write.csv(xy,"data.csv", row.names=F)
稍后,使用write.table

  xy = data.frame(Sys.Date(), matrix(runif(5*6), ncol = 6))
  write.table(xy, file="data.csv", sep = ",", append = T, col.names = F, row.names=F)

我不确定您想实现什么样的自动化,因为这似乎每天只需要运行几行代码。但是对于新的日子,您可以只运行
df-How-do-rbind,而不首先添加日期,列数将与df和df1不匹配,并且将生成一个错误。
     name number  Date
  1    a      1   2018-05-08
  2    b      2   2018-05-08
  3    c      3   2018-05-08
  4    d      4   2018-05-08
  5    e      5   2018-05-08
  6    f      6   2018-05-08
  7    l      3   2018-05-09
  8    c      4   2018-05-09
  9    a      5   2018-05-09
 10    c      6   2018-05-09
 11    d      4   2018-05-09
 12    g      2   2018-05-09
  xy = data.frame(Date = Sys.Date()-1, matrix(runif(5*6), ncol = 6))
  setwd(....)
  write.csv(xy,"data.csv", row.names=F)
  xy = data.frame(Sys.Date(), matrix(runif(5*6), ncol = 6))
  write.table(xy, file="data.csv", sep = ",", append = T, col.names = F, row.names=F)