R 连接 Mongodb

library(RMongo)
mongo <- mongoDbConnect("local")
dbShowCollections(mongo)
results <- dbGetQuery(mongo, "startup_log", "{}", 0, 2)
dbDisconnect(mongo)