如何使用rmongodb在R中迭代mongodb查询

我的数据在mongodb中的集合“bd”中，该集合位于数据库“mydb”中。 它的亚马逊评论数据，我关心的是“产品/产品ID”字段和与之相关的数据

#loading rmongodb library
library(rmongodb)
mongo <- mongo.create()
if(mongo.is.connected(mongo) == TRUE) 
{
#selecting mydb database
db <- "mydb"
mongo.get.database.collections(mongo, db)
} 
#selecting bd collection in mydb
coll = "mydb.bd"
#putting all productId in the res variable
if(mongo.is.connected(mongo) == TRUE) 
{
#since there are duplicate values of "product/productId" field,i stored only unique values of it
res <- mongo.distinct(mongo, coll, "product/productId")
} 
#logic to get review blob for a particular productId and here is where i get error
if (mongo.is.connected(mongo) == TRUE)
{
for(i in 1:length(res))
{
#getting error here while iterating for each productId stored in res[i] 
doc <- mongo.find.all(mongo,coll,'{"product/productId": res[i]}')
}
}
#but i get error in here as==>
#Error in mongo.bson.from.JSON(arg) : 
#Not a valid JSON content: {"product/productId": res[i]}

#加载rmongodb库
图书馆（rmongodb）
mongo答案在错误消息中-您的JSON无效

q <- paste('{"product/productId":', res[i], '}')
mongo.find.all(mongo, coll, q)

谢谢@Dmitry:），第二种方法有效，但对于第一种方法，当我使用第1种方法时，我在文档中没有任何关于mongo.find.all（mongo，coll，q）的内容
mongo.find.all(mongo, coll, list("product/productId" = res[i]))