r - 如何在 R 中列出 mongodb 集合

Question

我一直在尝试在 R 中的 mongo 数据库中列出集合。我意识到此功能仍在 mongolite 包的待办事项列表中（https://github.com/jeroen/mongolite/issues/86）。似乎有一个包，rmongodb它起到了作用（Unable to see all collections from a mongodb remote server using mongolite）。但是，它不再是 CRAN 的一部分。

任何人都可以建议一种方法来列出数据库中的所有集合吗？

mongodb 是远程的，所以我想将 mongoshell 与 with 结合使用system()不是一种选择。至少不是一个简单的。

谢谢

Answer 1

我想出的解决方案如下：

ListMongoCollections <- function(db, mongoConString) {

  result <- system(glue::glue(
    "
    mongo --host <<mongoConString>> --eval \"
      db.getMongo().getDBNames().forEach(
        function(v, i) {if (v.valueOf() === '<<db>>') {
          print(db.getSiblingDB(v).getCollectionNames().join('%%%'))
        }}
      )
    \"
    ",
    .open = "<<",
    .close = ">>"
    ),
    intern = T
  )

  collections <- result %>% stringr::str_detect("%%%")

  result <- result[collections] %>% 
    stringr::str_split(pattern = "%%%", simplify = T) %>% 
    as.character()

  result

}