Как отправить несколько документов с помощью RMongo

Question

Я следую соглашениям от http://docs.mongodb.org/manual/reference/method/db.collection.insert/
для отправки партии нескольких документов за один вызов RMongo :: dbInsertDocument.

data=data.frame(A=c(1,2),B=c(3,4)) 
L=lapply(split(data,rownames(data)),as.list) 
names(L)=NULL 
dataJSON = toJSON(L) 
cat(dataJSON) 

, который дает следующий результат:

[ 
{ 
    "A":1, 
    "B":3 
}, 
{ 
    "A":2, 
    "B":4 
} 
] 

Тогда

dbInsertDocument(rmongo.object=myRmongo.object, collection=myCollection, doc=dataJSON) 

возвращает следующую ошибку:

Error in ls(envir = envir, all.names = private) : 
invalid 'envir' argument 

Обратите внимание, что, если я заменю

L = L[[1] 

Тогда

cat(dataJSON) 

дает следующий результат:

{ 
"A":1, 
"B":3 
} 

и тот же вызов dbInsertDocument работает без ошибок (и данные действительно передается в базу данных)

Answer 1

Кто-нибудь понял это? Мне бы очень хотелось, чтобы это было лучше, но теперь я просто перебираю список (не идеальный).

data=data.frame(A=c(1,2),B=c(3,4)) 
L=lapply(split(data,rownames(data)),as.list) 
names(L)=NULL 
for (i in 1:NROW(L)) { 
    dataJSON = toJSON(L[[i]]) 
    output <- dbInsertDocument(mongo, "test_data7", dataJSON) 
}