1

我在使用正则表达式从 R（使用 rmongodb 包）查询 mongodb 时遇到问题。下面是我的代码：

buf <- mongo.bson.buffer.create()
regex <- mongo.regex.create("air filter*$", options="i")
mongo.bson.buffer.append.regex(buf, "keyword", regex)
query <- mongo.bson.from.buffer(buf)
res <- mongo.find.all(mongo,collection,query)

但是我从数据库中得到了“res”的空结果。但是，当我直接检查数据库中的正则表达式时，它给了我有效的结果。当我在上面的查询中给出没有正则表达式的关键字名称时(eg: "air filter")，它工作正常。

我尝试了所有可能的组合，但徒劳无功。

以下是示例文档

[  
   {  
      "_id":ObjectId("55dcdc72473fdf86c0020d96"),
      "_class":"",
      "keyword":"air filter",
      "synonyms":[  

      ]
   },
   {  
      "_id":ObjectId("55dcdc72473fdf86c0020e0f"),
      "_class":"",
      "keyword":"cabin air filter",
      "synonyms":[  

      ]
   },
   {  
      "_id":ObjectId("55dcdc79473fdf86c002143b"),
      "_class":"",
      "keyword":"secondary air filter",
      "synonyms":[  

      ]
   }
]

注意：我尝试过 json 字符串但不能使用，因为我需要将变量作为输入正则表达式传递，即我使用paste0(component[1], "*$")where 组件列表包含空气过滤器等术语来创建正则表达式。

你能提供一些指导吗？

谢谢！

4

1 回答 1

1

这是我尝试过的，它正在工作

library(rmongodb)
mongo <- mongo.create(host = "localhost", db = "test")

components <- list("air filter", "engine oil")

for (component in components) {
    jsonStr <- paste0('{"keyword" : {"$regex" : "', component, '$"}}')
    mongo.bson.from.JSON(jsonStr)
    res <- mongo.find.all(mongo, "test.coll", mongo.bson.from.JSON(jsonStr))
    print(res)
}
于 2016-02-04T07:25:13.607 回答