Question

我在使用正则表达式从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)

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

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

以下是示例docoments

[  
   {  
      "_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], "*$")创建正则表达式，其中组件列表包含空气过滤器等术语。

你能提供一些指导吗？

谢谢！

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

使用正则表达式的Rmongodb无法按预期工作

1 个答案: