我正在尝试自动化代码,我在其中提取上周的数据并每周运行一次。如何在 R 的 sql 查询中获取 Sys.Date()。
库('RJDBC')
Tdata<- dbGetQuery(conn, "select roll_id,source,create_date,login from master_data where create_date>'2017-07-17'")
所以基本上我想创建条件create_date> Sys.Date()-7。怎么做?
我认为您最好的选择是从 SQL 查询(而不是 R)中获取当前日期。我相信你可以做到这一点GETDATE()
。
另一种方法是使用paste0()
R 中的函数在将查询文本传递给dbGetQuery()
.
这将是类似的东西query_txt <- paste0("select roll_id, source, create_date, login from master_data where create_date > '", Sys.Date()-7, "')"
。
然后Tdata <- dbGetQuery(conn, query_txt)
。
希望有帮助!
尝试使用粘贴(或 paste0):
Tdata <- dbGetQuery(conn,paste0("select roll_id,source,create_date,login
from master_data where create_date>'", Sys.Date()-7, "'"))