题
使用mongolite
包R
,如何查询给定日期的数据库?
示例数据
考虑一个test
包含两个条目的集合
library(mongolite)
## create dummy data
df <- data.frame(id = c(1,2),
dte = as.POSIXct(c("2015-01-01","2015-01-02")))
> df
id dte
1 1 2015-01-01
2 2 2015-01-02
## insert into database
mong <- mongo(collection = "test", db = "test", url = "mongodb://localhost")
mong$insert(df)
Run Code Online (Sandbox Code Playgroud)
Mongo shell查询
要在给定日期之后查找条目,我会使用
db.test.find({"dte" : {"$gt" : new ISODate("2015-01-01")}})
Run Code Online (Sandbox Code Playgroud)
如何在R
使用中重现此查询mongolite
?
R尝试
到目前为止我已经尝试过
qry <- paste0('{"dte" : {"$gt" : new ISODate("2015-01-01")}}')
mong$find(qry)
Error: Invalid JSON object: {"dte" : {"$gt" : new ISODate("2015-01-01")}}
qry <- paste0('{"dte" : {"$gt" : "2015-01-01"}}')
mong$find(qry)
Imported 0 records. Simplifying into dataframe...
data frame with 0 columns and 0 rows
qry <- paste0('{"dte" : {"gt" : ', as.POSIXct("2015-01-01"), '}}')
mong$find(qry)
Error: Invalid JSON object: {"dte" : {"gt" : 2015-01-01}}
qry <- paste0('{"dte" : {"gt" : new ISODate("', as.POSIXct("2015-01-01"), '")}}')
mong$find(qry)
Error: Invalid JSON object: {"dte" : {"gt" : new ISODate("2015-01-01")}}
Run Code Online (Sandbox Code Playgroud)
小智 7
因为当我再次忘记如何查询日期mongolite
并且懒得去找文档时,这个问题不断出现在我的谷歌结果的顶部:
上面的 Mongodb shell 查询,
db.test.find({"dte" : {"$gt" : new ISODate("2015-01-01")}})
现在翻译成
mong$find('{"dte":{"$gt":{"$date":"2015-01-01T00:00:00Z"}}}')
您可以选择添加毫秒:
mong$find('{"dte":{"$gt":{"$date":"2015-01-01T00:00:00.000Z"}}}')
如果您使用错误的日期时间格式,您会收到一条有用的错误消息,指出正确的格式:use ISO8601 format yyyy-mm-ddThh:mm plus timezone, either "Z" or like "+0500"
当然,这也记录在mongolite 手册中
@ user2754799有正确的方法,但我做了一些小改动,以便它回答我的问题.如果他们想用这个解决方案编辑他们的答案,我会接受它.
d <- as.integer(as.POSIXct(strptime("2015-01-01","%Y-%m-%d"))) * 1000
## or more concisely
## d <- as.integer(as.POSIXct("2015-01-01")) * 1000
data <- mong$find(paste0('{"dte":{"$gt": { "$date" : { "$numberLong" : "', d, '" } } } }'))
Run Code Online (Sandbox Code Playgroud)