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