Если вы используете rmongodb (есть аналогичный пакет под названием Rmongo):
r <- mongo.find(mongo, "test.user", list(age=list('$gt'=21L)))
Объект запроса BSON также может быть построен следующим образом:
buf <- mongo.bson.buffer.create()
mongo.bson.buffer.start.object(buf, "age")
mongo.bson.buffer.append(buf, "$gt", 21L)
mongo.bson.buffer.finish.object(buf)
query <- mongo.bson.from.buffer(buf)
r <- mongo.find("mongo", "test.user", query)