从列表中创建数据框（twitteR）

Question

我正在尝试创建带有推文的数据框。搜索词是另一个数据集（mer_df）中的标题，该数据集我已经在同一项目中创建。

mer_df$title <- as.character(mer_df$title)
View(mer_df$title)

#create new column
newColumn <- as.character(mer_df$title)
View(newColumn)

#tweets in list
tweets <- list()
for (i in 1:2){
  tweets <- c(tweets, searchTwitter(mer_df$title[i], n=2))
}
View(tweets)

#create dataframe out of tweets
tweets_dataframe <- as.data.frame(tweets)

运行此代码时，出现以下错误消息：

Error in as.data.frame.default(x[[i]], optional = TRUE) : 
  cannot coerce class ‘structure("status", package = "twitteR")’ to a data.frame

你们当中有人知道我如何克服这个错误吗？