Преобразование твитов в Bson с использованием библиотеки twitteR и rmongo

Question

Поскольку API-интерфейс streamR больше не работает в Tweeter, я пытаюсь преобразовать вывод функции searchTwitter (из TwitteR) в BSON, прежде чем вставлять его в базу данных mongodb.

test.tweets = searchTwitter("mongodb", n=10, lang="en") 
class(test.tweets) 
test.text=laply(test.tweets,function(t) t$getText()) 
class(toJSON(test.text)) 
bson <- mongo.bson.from.JSON(test.text) 

R возвращает ошибку: «Ошибка в mongo.bson.from.JSON (test.text): Не действительное содержание JSON: ...» Как разрешить это преобразование или существует другое решение? Спасибо

Answer 1

Это работает

library(rmongodb) 
library(jsonlite) 
test.text <- c("A tweet", "Another tweet") 
(bson <- mongo.bson.from.JSON(toJSON(test.text))) 
# 1 : 2  A tweet 
# 2 : 2  Another tweet