r mongolite-日期查询 [英] r mongolite - date query

问题描述

问题

使用R中的mongolite包，如何查询给定日期的数据库?

Using the mongolite package in R, how do you query a database for a given date?

示例数据

考虑具有两个条目的test集合

Consider a test collection with two entries

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)

Mongo shell查询

要查找给定日期之后的条目，我将使用

To find the entries after a given date I would use

db.test.find({"dte" : {"$gt" : new ISODate("2015-01-01")}})

如何使用mongolite在R中重现此查询?

How can I reproduce this query in R using mongolite?

R次尝试

到目前为止，我已经尝试过

So far I have tried

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")}}

推荐答案

@ user2754799具有正确的方法，但是我作了一些小改动，以回答我的问题.如果他们想使用此解决方案编辑答案，我会接受.

@user2754799 has the correct method, but I've made a couple of small changes so that it answers my question. If they want to edit their answer with this solution I'll accept it.

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, '" } } } }'))

这篇关于r mongolite-日期查询的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！