r - 如何使用 rmongodb 将数据框插入 mongodb

Question

我有以下数据框

如何使用 rmongodb 将其插入 mongoDB？

Answer 1

您需要创建一个 JSON 对象列表，每个对象都将插入到 Mongo DB 中：

library(rjson)
df <- data.frame(rowLabels=c("Birrarung Marr", "Bourke Street Mall (North)", "Bourke Street Mall (South)", "Flagstaff Station", "Flinders St Station Underpass", "Melbourne Central", "Princes Bridge", "Sandridge Bridge", "State Library", "Town Hall (West)"),
                 locationMax = c(8592, 3213, 3127, 138, 4472, 3923, 4595, 1758, 4252, 2926))
df_list <- lapply(split(df, 1:nrow(df)), function(x) mongo.bson.from.JSON(toJSON(x)))

mongo <- mongo.create()                                # connect to Mongo on localhost
if (mongo.is.connected(mongo) == TRUE) {
    icoll <- paste(db, "test", sep=".")
    mongo.insert.batch(mongo, icoll, df_list)          # insert into the MongoDB
    dbs <- mongo.get.database.collections(mongo, db)
    print(dbs)
    mongo.find.all(mongo, icoll)
}