将数据附加到R Automation中具有当前日期的现有数据
我有一个CSV文件,它有两列名称和编号,这个CSV每天都会生成,我想要的是有一个单一的变量,并将我每天获得的数据与当前日期一起附加到这个变量中,以便记录。 需要将此过程自动化为日常任务。 下面是我所做的 假设这是第一个数据将数据附加到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 以这种方式将日期添加
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)